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INTRODUCTION 


Carrying the compact PB-770 personal computer is equivalent to taking 
along the capacity of a tabletop model. RAM (Random Access Memory) 
can be expanded up to 32K bytes, which gives you a broad range of 
30,000 character storage. 

Writing (storing) data in the RAM is an easy process using the BASIC 
language programming described in this manual. And once the data you 
want has been stored, it can be read selectively anytime or changed to 
suit new applications. Remember, a computer is worthless without a 
program, so the more you learn about BASIC language programming, 
the more you will be able to utilize the many advantages of personal 
computing. 

Once you have seen how well the PB-770 can serve you, its functions can 
be broadened by connecting an optional plotter-printer with cassette 
interface. This allows the fast preparation of expressive 4-color graphs 
and tables. 

You can be sure that the more you use the PB-770 the closer a companion 
it will become. The aims of this manual are to first build your familiarity 
with this clever personal computer so you can start to make full use of it 
in your daily life. 
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OUTLINE 


The many features of the PB-770 personal computer present an interest- 
ing challenge to the beginner, but there is no instant route to total under- 
standing of its varied uses. 

The step-by-step approach is by far the best path to familiarity with each 
function, and it is usually found that computing skill is gained in direct 
proportion to time spent on the keys. 

So this manual is laid out to introduce the personal computer in an 
easy way by providing various practice programs in BASIC while training 
you in actual key operation. 

Of primary importance is learning the correct handling of the PB-770. 
Chapter 1 lays out its features and basic usage procedures. Chapter 2 
covers the functions of each key and the display screen preparatory to 
learning BASIC. 

Fundamentally, a computer stores and computes. Chapter 3 sets out to 
explain how a BASIC program can be prepared to store volumes of data 
in the PB-770 by an ‘Array Programming” method for recall whenever 
required. It also outlines for the beginner the use of graphic program- 
ming on the large display of the PB-770 and how to make use of the 
operational plotter-printer with cassette interface. 

Chapter 4 is for the user who has already mastered BASIC. It explains in 
detail how to use many of the commands and functions of the PB-770. 
We do not recommend that the beginner learns all commands from this 
chapter in series. Only 10 BASIC commands are necessary to form a 
good structural knowledge. 

Chapter 5 gives representative programs for use with the PB-770. They are 
practical, easy to apply, and may be rearranged for specific applications. 


CHAPTER 1 


GENERAL 
GUIDE 


1-1 PRIOR TO OPERATION 


The PB-770 is a product of CASIO’s strict testing process, high level 
electronics technology, and strict quality control. 

To ensure long life and trouble-free operation, please observe the follow- 
ing precautions. 


: IMPORTANT 
@ This computer is constructed of precision electronic components. 
Never attempt disassembly and/or maintenance. Special care should 
also be taken to avoid damage by bending or dropping. Do not carry 
the computer in your hip pocket. 

@ Use only the optional FA-10 plotter-printer with cassette interface, 
FA-11 plotter-printer with standard cassette tape recorder and cassette 
interface, or FA-4 printer interface (CENTRONICS standard) with 
cassette interface. Never connect any other peripheral equipment to 
the connector of this unit. 

@ Avoid temperature extremes. Do not store this unit in an automobile, 
near a heater, or any other location where it may be exposed to high 
temperatures. Also avoid use and/or storage in areas subject to high 
humidity and dust. Extremely low temperatures can slow display 
response or cause the display to cease operating. Normal operation 
will return when the temperature is brought back to normal. 

@® Clean the unit by wiping its surface with a soft, dry cloth or a cloth 
dampened with a neutral detergent. Never use such liquids as thinner 
or benzine. 

@ Before assuming malfunction, first check the power supply and con- 
firm that there are no programming errors. 

@ Should service be required, contact your nearest dealer. 


iz, 


1-2 SYSTEM CONFIGURATION AND 
CONNECTIONS 


FA-11: Plotter-printer with standard cassette tape recorder and cassette 
interface 

FA-10: Plotter-printer with cassette interface 

CM-1: Microcassette tape recorder 

FA-4: Printer interface (CENT RONICS standard) with cassette interface 

OR-8: RAM expansion pack (8K bytes) 


= Connecting to another PB-770 (Unit-to-unit programs/data transference) 


= Connecting'an FA-11 


PB- ee | perm | FA-11 


. 
tape 


recorder 


= Connecting an FA-10 


PB-770 
tape 


recorder 
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= Connecting an FA-4 


Standard paper Plotter-printer 
printer 
x A 


‘ CENTRONICS cable | 


Oo fates ec en mg le gi mh teeth my em 


PB-770 ————> FA-4 
CM-1 tape 


recorder 
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1-3 BATTERY MAINTENANCE 


@ Battery Loading 


Turn the power of the PB-770 OFF. Turn 
the computer over and slide open the 
battery compartment lid (Fig. 1). 

Load four AA size batteries. Batteries may 
burst if not installed correctly. Always 
ensure that the polarities of the batteries 
are correct. Load the batteries so that their 
minus (—) poles are contacting the springs 
located in the battery compartment (Fig. 2). 
Mixing old and new batteries will consider- 
ably shorten overall battery life. Therefore, 
always load or replace a full set of new 
batteries. 

Battery leakage can damage the unit and 
cause malfunction. Always remove batteries 
when the unit is not used for extended 
periods. 


@ Battery Replacement 

When the buzzer sound produced by the 
BEEP command weakens or when the 
display becomes blank, replace the bat- 
teries with new ones. (For battery specifi- 
cations, see page 329.) 


@ Power Source Configuration 

Since the PB-770 power source is divided 
into a main power source and a sub power 
source for RAM backup (Fig. 3), programs 
or data in the mainframe are not lost during 
main power source or sub power source 
battery replacement. Programs or data are 
only lost when the main and sub power 
sources are removed at the same time. RAM backup battery 


* In order to prevent the chance of malfunction due to battery leakage, 
be sure to replace the main batteries and RAM backup battery every 2 
years regardless of how much they are used. 


* With the main batteries removed, the sub battery protects RAM for 
approx. 4 months when RAM capacity is standard 8K bytes (approx. 
1 month when RAM capacity is expanded to 32K bytes). 


15 


CHAPTER? GENERAL GUIDE 


* When both the main batteries and the RAM backup battery are re- 
placed, be sure to enter NEW ALL @) after replacing batteries. 

* Keep batteries away from children. If swallowed, contact a physician 
immediately. 


Hi Auto Power Off 


Power is automatically switched off approximately 6 minutes after the 
last key operation (except during program execution) to conserve power. 
Power can be restored by pressing the key or turning the power 
switch OFF and then ON again. 


Hi Low-voltage Detection Feature 

The Low-voltage Detection feature of the PB-770 protects RAM contents 
when the voltage of the main batteries drops below a certain level. 

When the voltage decreases, the whole display becomes blank or the dis- 
play during program execution blinks, and the PB-770 is no longer oper- 
able. The batteries must then be immediately replaced. RAM contents 
will be altered by switching the unit ON with dead batteries installed. 


16 


1-4 RAM EXPANSION PACK (OPTIONAL) 


Fig. 1 Turn power OFF. 


Insert the RAM Expansion 
Pack as shown above. 


Fig. 2 Slide the holder in the 
direction of the arrow. 


Fig. 3 RAM Expansion Pack 
insertion sequence. 


RAM 3 RAM 2 RAM 1 


The basic unexpanded RAM capacity of 
the PB-770 is 8K bytes. The RAM capacity 
can be expanded up to a maximum of 32K 
bytes by installing optional OR-8 RAM 
expansion packs. 

One RAM expansion pack provides 8K 

bytes. Expansion packs are installed by the 

following procedure. 

(1) Turn off the power of the PB-770. 

(2) Turn over the PB-770 and remove the 
RAM box cover by pressing the two 
catches. 

(3) Holding the sides of the OR-8 RAM ex- 
pansion pack, insert it into the far right 
position of the unit (Fig. 1). 

Since RAM is very. sensitive to static 
electricity, be careful not to touch the 
terminals of the OR-8. 

(4) Lightly press the holder and slide it 
into a locked position (Fig. 2). 

(5) Install the required number of RAM ex- 
pansion packs. Then replace the RAM 
box cover and turn the power of the 
PB-770 ON. 

(6) Enter NEW ALL @] . Then confirm 
a RAM capacity by entering (sur) SH 


(7) Install the RAM Expansion Packs in the 
sequence of 1—2—3 (Fig. 3). 
If a RAM Expansion Pack is installed in 
position 2 skipping position 1, correct 
functions cannot be performed. 


Ly: 


1-5 NOMENCLATURE AND OPERATION 


e Display contrast control ... Adjust so the display can be easily read. 


e Alphabet keys .......... Used to display upper-case letters. When 


Example: 


the alphabet keys are pressed while hold- 
ing down the key, lower-case letters 
are displayed. 

Commands or symbols printed above 
each key can be displayed by pressing 
the alphabet keys while holding down 
the key (one key commands). 
Functions printed below each key can be 
displayed by pressing the alphabet keys 
while holding down the [F) key (one key 
functions). 


SYSTEM --- SHIFT mode 
-- + DIRECT mode 
INKEY$ ... FUNCTION mode 


* Use the CHR$ function for symbols and characters which cannot be 
input directly by pressing a key. (See page 245.) 
e Return key ( eS) } Sab ae Used to perform BASIC command or 


program input and output and to execute 
data input and output. 


e Enter key ( | rere Used to execute an instruction during 


Example: 


manual calculations. 


2) (2) (7) @) (Enter) > 3 


@ See “2-5 Editing and Special Key Functions” in Chapter 2 for the 
detailed use of each key. 


Display contrast___ 


control 


Function key 


CAPS key 


Display FA-10, FA-11 or FA-4 connector 


Power switch 


CEICICIOIUEICICIG) &) Ga) 


Ca) OW) CEJ CRI OO GO) OP) 
ee) ASDA - 
sHiFT J CZ) OX) CC) LV) LB) LN) 0] [sre } él 


Shift key Alphabet keys Return key Enter key 
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1-6 TEST OPERATION 


This is a demonstration program to show the functions of the PB-770. If 
see oe trouble inputting the program correctly, refer to Chapters 2 
and 3. 
With this program you will be able to see various functions of the display 
screen, the BEEP command and the execution speed of graphic com- 
mands. 

1@ CLS 

2@ LOCATE 331:PRINT “PB-770 TESTING" 

3@ FOR A=31 TO @ STEP -1 

4@ DRAW(@,AX-C159;AD 

5@ NEXT A 

6@ LOCATE 5;1:PRINT “BEEP SOUND" 

7@ FOR A=8 TO YQ 

80 BEEP 1:BEEP 1:BEEP @ 

90 NEXT A 

10@ CLS 

11@ FOR A=33 TO 255 

120 PRINT CHRS$CAD; 

13@ NEXT A 

14@ FOR A=8 TO 20 

15@ NEXT A 

16@ CLS 

17@ FOR A=1 TO 16 

18@ DRAWCAt+2> 16-A)-CAK3s 16-AI-CAK3s 15+ 

A-CA+2; 15+AI-CA+2>) 16-AD 

19@ NEXT A 

200 FOR A=8@ TO 200 

21@ NEXT A 


nee, 


CHAPTER 2 


KEY OPERATION 
AND 
DISPLAY 


2-1 KEY FUNCTIONS IN DIRECT MODE 


When a key entry is made in direct mode, the character or function 
inscribed on the key is input. 


(aA) — (Z) Upper-case alphabetic characters 
Space (blank) 

+), &), 0, 0), G), GZ Symbols 

— (3) Numbers 

(:) Decimal point 

(+), ©), &), Arithmetic symbols 

Display clear 

DEL Character delete 

Break (execution halt) 
Manual calculation execution 
e] Program input and execution 
(<], Cursor movement (left, right) 
SHIFT mode designation 

CAPS mode designation 
FUNCTION mode designation 
Answer key (Most recent calculation result) 


HM Number of characters in one statement 


A maximum of 79 characters can be entered in a calculation formula 
during manual calculation or in one line during BASIC programming. 


Key Functions In Direct Mode 


STOP 


| ee 8 (7) (8) (3) 

OMe mmm ooo (4) (5) (JE) 
I DDmmmoOhom Mee) 
Garr 0 00 C0 0 08 OND OD) a} (@} C-) Center ) 
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2-2 KEY FUNCTIONS IN SHIFT MODE 


When the key is held down and another key is pressed, the brown 
character, symbol, etc. printed above each key is input. 
26 different one-key commands are provided. 


(8), (4), (SJ), B, (8), GF), &, @), HW, W), @ Symbols 

(INS) Character, symbol insertion 

= Program area designation 

Ca Previous line display in the EDIT mode (see page 134.) 
(#),(%) Cursor movement (up, down) 

Cursor movement (to the beginning of a statement) 
[RECALL) 


Recall function 


Key Functions In Shift Mode 


CUBIGIBIKICICI 4) 4) ls) 


OD ammm mei - 
2] 


2-3 CAPS MODE 


Lower-case letters are input by holding down the key and pressing 
another key. 


ono 


STOP 


(od (5) (os) 


OMmOOOOO eww (7) (8) (3) J 
OmmmmOommwe (4) (5) (6) &) 
seal oe a ele Oj) &) 


TWWOW WW ee (2) C_) Center 
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2-4 KEY FUNCTIONS IN FUNCTION MODE 


When the LF_Jkey is held down and another key is pressed, the respective 
function noted below each key is input. 


STOP 


(7) Ce) C8) 
(4) 6) CJ ©) 


ORF Mme A BEI) 
a (2) CJ Center] 


(1) Ge) (SPACE) Blank entry in all key modes. 

(2)fas) ..... (Clear screen/Home) Clears the display and moves the 
cursor to the top left of the display. 
only moves the cursor to the beginning of a 
statement while the display remains as it Is. 

(3) a) ..... (Delete/Insert) Deletes the character or symbol at the 
cursor position, and shifts the characters or symbols at the 
right of the cursor to the left. 

Uis]shifts the characters or symbols at the right of the 
LW 4 . . 
cursor to the right and inserts a blank. 
A repeat function allows the continuous deletion of cha- 
racters or insertion of spaces when or is held 
au down. 

(4) (orc) (Break) Suspends calculation and program execution. Also 
used to turn the power ON when auto power off has been 
activated. 


+ 4 
(5)G),@)... Moves the cursor left, right, up, down. The repeat function 
is available only for left, right movement. 


(6) (ENTER) 22... (Enter) Executes manual calculation. During key input 
wait in an INPUT statement, functions as @]. Assignment 
statements, commands, and statements cannot be executed 
with 
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STOP 
) RECALL 


(7 


oe «© © 


(9) (sat) (Pe) — 


(10) Gary... 


(11) Gag)... 


(12) CFD... 


(13)... 


2-5 EDITING AND SPECIAL KEY FUNCTIONS 


Stores the result of a previously executed manual calcula- 
tion. Also stores the numerical value output by a PRINT or 
LPRINT statement. 
Example: 3.4* 5 > 17 
5.8 3- (ENTER) >@.4 
Pressing (HA) activates a recall function that displays the 
last calculation formula executed using the key, the 
last program statement stored using the J] key, etc. 
Example: 100 *5 > 500 
(SuiFT} +100 5 
STOP 


Pressing will suspend the execution of a program. 
Execution can be resumed using the CONT command . 


(Return/Line back) Inputs programs and executes com- 
mands. Manual calculations cannot be executed using this 
key. The previous line can be displayed in the EDIT 
mode (see page 134) by 


(suit) (P9). . . Specifies a program area and executes the 
program in the specified area from the first line. 


(Shift) The shift mode is specified by holding down this 
key. The unit automatically returns to the direct mode 
when this key Is released. 


(Capital shift) The CAPS mode is specified by holding 
down this key. The unit automatically returns to the direct 
mode when this key is released. 


(Function) The function mode is specified by holding 
down this key. The unit automatically returns to the direct 
mode when this key is released. 


The line in which an error occurred will be displayed for 
correction by pressing this key immediately after the error 
is generated during program execution. 
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2-5-1 KEY FUNCTIONS IN KANA MODE 


Japanese or modded European PB-770s only 


When Kana mode is active after pressing the key, the respective 
symbol noted below each key is input. Note that Kana mode differs 
from other modes like CAPS in that it stays active until the key 


is pressed again. 


Key Functions In Kana Mode 


on Tor 


aril 
(er) (cis) [ans] (9) 


OOM oewmeea@a We 

MAAmoammwaeonw OWA 
OeaWOweaomamowa”Aq Wwe 
TOO ||| &s cl 


When Kana mode is active and the key is pressed in 
combination with one of the keys below, the respective symbol 


shown in the illustration below is displayed. 


Key Functions In Kana+SHIFT Mode 


on Tor 


STOP 


Cocoon 


Om mOmmaeeeaqm Cede) 
EWC Sale Ble le le le ee TAGs) ees 
are oc oreo FE) (oe) (Se) 


en WOOO Ee) 
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2-6 CALCULATION FUNCTIONS 


@ Calculation Precision and Functions 

All internal calculations are performed with a 12 digit mantissa (+ 2 digit 
exponent). Since decimal base operation is used, high precision calcula- 
tions can be performed. 

Manual calculations are executed with the key. 

Calculation results are displayed with a 10 digit mantissa (+ 2 digit ex- 
ponent). In this case, the 11th digit of the mantissa is rounded off. 


@ Operator Functions 


A Power 

i = Addition, Subtraction 

*, / Multiplication, division 

MOD Remainder calculation (If the numerical value includes a frac- 


tion, the fraction is discarded in this operation.) 


The calculation range is as follows. 

(1) Division by 0 causes an MA error. 

(2) When overflow occurs (i.e. when a result exceeds the calculation 
range), an OV error is generated. 

(3) Power range 


0 “A 0—MMaA error 
(£ x)89——>1 
0 Ay ——— 0 
0”~(-y) MA error 


(—x ) A(+y )—— Possible only when y is an integer. 
Otherwise, an MA error is generated. 
* Wherex >0,y >0. 


i Calculation Priority 


Calculations are executed in the following sequence. 
. Elements in parentheses 

. Functions 

. Powers (4) 

. Plus (+) and minus (—) signs 

*, / 

MOD 

+ : — 


NNDB WD 


26 


2-6 CALCULATION FUNCTIONS 


Formats 

1, AtY —> (X+Y)/2 

2. X*+2xv+y2? — > XR24+2*xK*KY+YR2 

3. -Y? — -Y%2 

4. (-Y) oe Cee ars 

5. (xY*)? > XCVO2 

6. x” — XA(Y* 2) 

7. Remainder of x — X MOD Y 
Examples 

1. 05490 — 1 

2. -0.5%0 — - 1 

3. (-0.5)%oe — 1 

4. 0.582 —> 0.25 

5. 0.5%-2 — 4 

6. (-@.5)*%-2 —>4 

7. 05%0.5 — > 0.7071067812 

8. (-@.5)*%0.5 — MA error 

9. 2°-0.5 —- @.7071067812 


(-2)*%-0@.5 — MA error 


—_> —_ 
—_> Cc 


10MOD 6 — 4 


— 
RO 


-10MOD 6 — -4 


—_ 
OOo 


10 MOD-6 — 4 


—_— 
> 


-10MOD-6 — -4 


CHAPTER 2 KEY OPERATION AND DISPLAY 


@ Relational Operators 
Relational operators can only be used in an IF statement (see page 186). 


= Equal 

<>,>< Not equal 

< Smaller than 

> Larger than 

=>, >= Either larger than or equal to. 
=<, <= Either smaller than or equal to. 


Examples: A+B < > @...The result of A +B does not equal Q. 
A$< >"Y" ... The content of A$ does not equal ‘‘Y”’. 
A$ = CHR$(84) + CHR$(79) + CHR$(77) ... A$ equals ‘“‘TOM”’. 
CHR$(67) > CHR$(N) ... CHR$(67), which is C, is larger than CHR$(N) 
in the Character Code Table (page 327). 


M@ Operations Using Variables 
The contents of variables can be confirmed with the (Enter) key. 


Example: A [ENTER] > Q 


When a numerical value is entered in a variable, the contents of the vari- 
able are as follows. 


Single-precision: Everyting from the 13th digit of the mantissa to the 
right is discarded (12 digits). Single-precision is the 
normal calculation precision. 

Half-precision: Everything from the 6th digit of the mantissa to the 
right is discared (5 digits). Half-precision is 5 digit 
numerical values realized by specifying an array vari- 
able (!). It can only be specified in an array variable. 
(See page 70). 


Half-precision computation 

Storage of a half-precision value requires only 4 bytes as opposed to the 
8 bytes needed for a single precision value. Except for engineering or 
scientific applications, 5 digits are usually sufficient for most computa- 
tions. If computation results concerning such data as test results, percen- 
tages, product numbers, prices and quantities can be kept within 5 digits, 
the amount of RAM area required for data storage is halved and memory 
Space is conserved. 
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2-7 VARIABLES 


M@ Kinds of Variables 
The PB-770 employs the following types of variables. 


(1) Numerical variables 
Numerical fixed variables (up to 12 digits). 
Numerical registered variables (up to 12 digits). 
Numerical array variables (Half-precision numerical array: up to 5 
digits. Single-precision numerical array: up to 12 digits). 
* The number of digits shown above is the number of internal calcula- 
tion digits. 
(2) Character variables 
Character fixed variables (up to 7 characters). 
Character registered variables (up to 16 characters). 
Character array variables (String length can be specified from 1 to 79 
characters. When no length is specified a default value of 16 is auto- 
matically used.). 


Example: 
DIM A$(9,9)....... Each character string can be 1 to 16 characters 
long. 
DIM A$(9, 9)* 50... .Each character string can be 1 to 5@ characters 
long. 


Fixed Variables (A—Z, A$—Z$) 


Memory where numerical values or characters are stored has 26 kinds of 
Fixed Variables which are A—Z or A$—Z$. Numerical fixed variables and 
character fixed variables with identical names cannot be used together. 
If an attempt is made to use identical variable names, a UV error will 
occur. 


Incorrect Usage: 10 PRINT A; A$ — UV error 


oo) 


CHAPTER 2 KEY OPERATION AND DISPLAY 


i Registered Variables 


In addition to fixed variables, variable names with two characters that 
consist of either 2 upper-case alphabetical characters or an upper-case 
alphabetical character and a number, can be used. If a variable name is 
defined with three characters or more, an SN error will occur during 
execution. 

Examples: AB, X1,Y1,X2,Y2,AZ$,AA$,B1$,Z29$ 


The beginning of a variable name must be an upper-case alphabetical 
character. 

Reserved words (IF, TO, PI, etc.) cannot be used as variable names. 

A 12-digit mantissa + and 2-digit exponent can be stored in anumerical 
registered variable (AB, X1, etc.). 

Up to 16 characters can be stored in a character registered variable. 

40 registered variables including array variable names can be used. If 
an attempt is made to use more than 4@ variables, a VA error will 
occur that will suspend execution. At this time, the variable names 
should be cleared using the CLEAR or ERASE command. 

A registered variable name can be recalled by executing LISTV. A 
numerical registered variable uses 8 bytes and a character registered 
variable uses 17 bytes. 
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2-8 DISPLAY SCREEN 


@ Character Coordinates 


Twenty characters horizontally and four character lines vertically fit in 
the display window (LCD). Character locations are expressed by a 
LOCATE statement with the following coordinates. 


x 20 characters 


(0, 0) Fe | (19, Q) 
4 lines 
y 
(0,3) |* i} (19, 3) 
LOCATE (X, Y) Ree ett an Rete aes See LOCATE. 


Based on the coordinates mentioned above, 222 characters in the charac- 
ter code table (see page 327) can be displayed. 


@ Graphic Coordinates 


Dots can be located on the display based on the coordinates shown 
below. Dot locations are expressed by a DRAW or DRAWC statement 
which allows dots and straight lines to be drawn or erased. 


x 160 dots 
(0, ®) (159, QO) 
y 
32 dots 
(Q, 31) (159, 31) 
DRAW (X, Y).............-..- See DRAW, DRAWC. 


Whether a dot is lit or not can be confirmed using the POINT function. 


POINT (XN hectic ce toweds bbs See POINT. 
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2-9 NUMBER OF BYTES USED FOR 
VARIABLES 


The remaining RAM capacity is reduced each time data are assigned to a 
variable (except fixed variables) during program execution. The number 
of bytes used for each type of variable is shown in the table below. Fixed 
variables from A through Z store data separate from the RAM area so 
they have no effect on the RAM capacity. 


Registered Variables | Array Variables 


Number of Number of 
Variable Bytes Used Bytes Used 
Numerical 
variable 


(Half-precision) 


Numerical 

Navlable Numerical 
variable 
(Single- 
precision) 
Character 
variable 

Character (Fixed-length) 

variable 17 eee 


variable 
(Defined- 
length) 


2—80 
(1—79 characters) 


of 


"BASIC" 
REFERENCE 


3-1 INTRODUCTION TO BASIC 


No doubt you have probably heard the word BASIC used at one time or 
another. It stands for ‘‘Beginner’s All-purpose Symbolic Instruction 
Code’’, and it truly is one of the most basic of computer languages. 

The beauty of this language is that it allows sophisticated programs to be 
produced using simple English commands that resemble everyday conver- 
sation. 

BASIC was developed at a U.S. university in 1964 for use on a large, 
main frame computer. Since then, however, it has grown in popularity 
and is now probably one of the most commonly used computer languages. 
In this chapter we will learn some of the fundamentals of BASIC that will 
allow you to eventually develop and write programs of your very own. 
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3-2 USING THE KEYS 


Although the PB-770 has a large data processing capacity and can per- 
form complicated numerical calculations, it can also be used to perform 
manual calculations without using programs. 


To help us get used to the PB-770, let’s start with a very simple operation. 
The following is displayed after power is switched ON. 


Ready P@ (This means that the program area is specified to No. 0.) 


The numerical keys (ten keys) on the right side of the keyboard are 
mainly used when the PB-770 is employed as a calculator. , &), and 
(=) are not included with the ten keys as with a standard calculator. 
Although (£) is located within the set of main keys it cannot be used as 
the ) key ona standard calculator. 

The («) and (4) keys are used for (X) and | respectively, while the nr} key 
functions as the (=) key. 


Let’s try 1+2. When you enter G) (+) 2) , is the following displayed? 


oa 
Ready PO 


12 


Cursor 


If you make a mistake, move the Cursor to the location of the mistake 
using the (6) and keys and input the correct value. 
Next, when you press the {Enter} key, the answer willbe displayed as follows. 


Jo 


CHAPTER3 “BASIC” REFERENCE 


Besides the four basic arithmetic functions, the PB-770 is also capable of 
such operations as powers, trigonometric functions, inverse trigonometric 
functions and logarithmic functions. 


[Numerical Expression] [Input Format] 
5xX6+2 » S*K6/2 
6.5° » 65°2 


SIN eae eee =» (SINS + COS 60)/ TAN 45 


36 


3-3 VARIABLES AND ASSIGNMENT 


Now let’s try another calculation. 
500000 X (1 + 0.07)12, 800000 X (1 + 0.07) 


These expressions compound interest over 10 years and add it to the 
principals. What is the simplest way to perform these two calculations? 
Once a calculation expression is input, it is partially available for repeat 
use. 


Therefore, 


Enter A = (1 + 0.07)*10 @) and input the previous two ex- 
pressions as 


A * 500000 [ENTER], A * 800000 EnrER} 


and the calculation becomes easier to perform. 

The value of (1 + 0.07)1% is stored in A. This A is called a variable in 
a program. 

To assign numerical value to variable A, the following operation is 
performed. 


A= 176 @] (Assign 176 to A) 
(Left side) (Right Side) 


Assignment is made to store the right side in the left side, so 176 is 


assigned to A in this example. The assignment instruction is ‘=’. To 
confirm that 176 is assigned to A, enter A which should display the 
contents of variable A. Is 176 displayed? 


This point is very important in understanding BASIC. 


“=” is the assignment instruction and does not mean equal as used in 
mathematics (except in a lF statement). For example, enter 


A=A+1@2) 


to assign the value of A+ 1 to A. Assuming that 176 is stored in variable 
A. After the above expression is executed by the computer, 177 is assign- 
ed to variable A. Enter A [enter)to confirm this. 

Is the following displayed ? 


A 
177 


— (Cursor) 


of 


CHAPTER 3 “BASIC” REFERENCE 


w NER) and @) 


It is also important to understand the difference between the Err) and =) 
keys.It should be noted that the @|key was used to input A=1 76 and the 
key was used to display the value of A in the previous operations. 


The key is used the same as the keys on a standard calculator for dis- 
playing an answer. This is called manual calculation. 

The ©] (Return) key, on the other hand, is used to execute the com- 
mands of aBASIC program.For example, it is used to input a program, to 
correct a certain part of a program, or to execute aBASIC command. 
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3-4 USING VARIABLES 


An alphabetical character from A to Z or two characters (alphabetical 
character + one character) such as AA, and N11 are used as variable 
names. Variables with numerical values assigned as in the previous 
section can be freely used in calculation expressions. 

Now, let’s practice. When you enter 


36 is assigned to A, and 12 is assigned to B. Next, enter 
A+B 


since (Enter) is used ‘‘to display an answer” in a manual calculation. If 48 
is displayed, perform the next step. 


A —B Enter) > 24 
A * B (Enter) > 432 
(4+ A) * LOG B Enter) +> 99.39626599 


Mastering the use of variables results in a high degree of versatility. Soon, 
however, you will realize that the simple examples shown above are 
extremely limited: That is what brings us to programming. Actual pro- 
gramming is not very difficult at all if you can understand how variables 
are used. 
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3-5 PROGRAM ENTRY 


First of all, let’s look at the proper procedure for inputting a program. A 
look at the keyboard of the PB-770 shows that the alphabetical keys are 
laid out the same as on a standard typewriter keyboard. Now, perform 
the following inputs. 


©) —» Specifies program area PQ. 
(n) (E) (w) @) —  Erases program stored in PQ. 


CLs — Clears screen. 
[Program] [Key Operation] 
10 CLEAR = Mame I) >< niates presi 
20 A=A+1 BOWED HoO2) 


30 LOCATE 7,2 DB@OUDOWMMOAHD BJ) 
409 PRINTA @OmMS@ 2) 
5Q GOTO 20 Aman Sa@ &) 


FT 
—— | 


Enter @3(®) ©) ®)@) or . If correct entries were made, numerical 
characters are displayed at the center of the screen at a high speed: 

i ene 

If “SN error PO — line No.” is displayed to indicate an entry error, 
correct (debug) the specified line as follows. 


Line No. @) 


The specified line is displayed when you perform this operation. Move 
the cursor to the point to be corrected, perform the correct input 
and press the @] key. The next line will be displayed, and, if no correc- 
tion is required, press the key. Then enter (m8) (u)(%) @) again. It 
should be noted that the EDIT mode is used for program corrections. 
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3-5 PROGRAM ENTRY 


= Program Areas 


The PB-770 contains a total of 10 “program areas” numbered from PO 
through P9. Each of the program areas is independent, so up to 10 
programs can be individually stored in the unit, recalled when 
needed and executed without affecting programs in the other 
pro-gram areas. 

When the power of the PB-770 is turned ON, “Ready PO” appears on 


the display to indicate that the specified program area is PO. The 6 key 
can be pressed at any time to display the currently specified 
program area. The following operations are used to change the 
program area from the one currently specified. 


PROG 1@) or Gin) 12). 


4] 


3-6 BASIC PROGRAMMING [1] 


Now, let’s try an actual BASIC program. 
A program that obtains the area of a square as the one shown below is 
prepared using the following sequence. 

(1) Request input of the length of one side A. 

(2) Multiply the entered numerical value by itself. 
(3) Display the result. 

(4) Return to (1). 


41Q INPUT A  ceccereseeeeees D 
20 B= AKA  crcccteeeeeeees 2) 
3Q PRINT B i cecccecceceeees 8 
AQ GOTO 1Q  crvrrreeseeeees ® 


Now, input this program using the following procedure. Be sure to press 
the keys correctly. 


Power ON.............. Ready PQ displayed. 

NEW@)............000- J] is an input key located on the right below the 
alphabet keys. 

1Q@ (OA J) ene te errestse Press the and (4 keys simultaneously. 

20 B=Ax*A ©} Et Patina. oe (*) is located in the ten keys. 

32 (B @) ....... Press the and Ce) keys simultaneously, 

40 (412 @) eden teh ahi Press the and (3 keys simultaneously. 


Next, execute the program using the following procedure. 
AO) @)..... SHIFT) ¢@) can also be used. 
Uy 
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3-6 BASIC PROGRAMMING [1] 


After this entry is made, ? is displayed. _ is called a cursor. Now, 
enter 


85 @) 


and the next display should appear. If it does not appear, check if 
there is a program input mistake with i} @). Be careful not to 


make mistakes concerning the difference between @ and O, and 1 and |. 


Value of one side is 8.5. 


Area is 72.25. 


What is the value of one side ? 


After confirming the execution of this program, let’s analyze it. 


10 INPUT A 
(Make anentry) (to A) 


“10” is a line number which indicates the program execution sequence. 
It is increased here by 10 for each line (to be explained later). INPUT 
means to make an entry, or, in other words, “?”’ is displayed to indicate 
that the computer is waiting for an entry. After an entry is made, the 
command stores it in a numerical variable. 


2OB=AX*A...... Assign the result of A * A to B. 


Line 20 computes the area. The entered numerical value is multiplied by 
itself to provide the area of a square, and the result is assigned to B. 


30 PRINT B 
rs a 
(Display) (B) 


Line 30 displays the area. PRINT is used as a “‘display”’ instruction. This 
line provides the instruction to display the contents of B. 


40 GOTO 10 
ey coors in 
(Go) (to line 10) 


GOTO is a command that means “go to’’ the line with the number that 
follows the command. 
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CHAPTER 3 “BASIC” REFERENCE 


The basics of the commands (INPUT, PRINT, and GOTO) used in this 
program should be understood after this explanation. However, this 
program is somewhat imperfect because it does not indicate what the 
input for ‘‘?”’ should be, or what kind of computation result is provided 
when this program is executed. Therefore, let’s add to this program with 
the following procedure. 


Ready PQ displayed. 
a Press (suit) and 5 keys simultaneously. 


After the line 1@ is displayed, press (©) to move the cursor to the location 
of A, thenenter ® @ ©) ® eH DA SZ). 


| ee 


The modified result is as follows: 
10 INPUT “A=";A 


A message with the When a message is inserted, a semicolon 

characters inside ‘* ” ( ; ) is required before the variable. 

is displayed. Be careful not to enter a colon (: ) by 
mistake. 


Next, line 2Q@ is displayed. Since this line is not to be changed, press 


Line 30 is displayed next. Move the cursor to the location of B, and 
enter HOMO OMMEAHD). The modified result is as follows. 


30 PRINT “AREA WJ” ; B 
Message is displayed inside ‘ ”’. | B is displayed following message. 


One space. 


After this, line 40 is displayed. Since this line is not to be modified, 
press ©] . 
Now, let’s execute the program. 


MON) @)............ @® can also be used. 
Now this program is considerably improved compared with the pre- 


vious program. This is because it asks “A=?” and displays “AREA 72.25” 
as the computation result. 
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3-7 BASIC PROGRAMMING | 2 | 


Now let’s look at another program that will help us get better acquainted 
with BASIC. In this program, the multiples of a specified value are pro- 
duced within the range of @ to 200. 


1@ REM MULTIPLE @]- - - - Press the @] key at the end of each line. 
28 A=0 @) 

3@ INPUT "NUMBER";N @] 

4@ A=A+1 J) 

5@ B=NXA @] 

6@ IF B>2@@ THEN 120 @] 

7@ PRINT B; @] 

8@ INPUT " OK";C$ @] 

9@ GOTO 40 2) 

1@@ END @] 


After you finish inputting the program, press and hold down the key 
followed by the #3 key. Then, when you press the @] key, the first 
line of the program will be displayed. If there is a mistake in the first line, 
move the cursor into position and correct the error. 


[1] 10 REM MULTIPLE See page 209. 
2 , ee 
Line number Command Label 


A BASIC program consists of line numbers, instructions (program 
instructions or part of an instruction), and variables or expressions that 
use variables. 
Since line 10 is a REM statement, a label is provided to indicate this is a 
multiple program. Anything following REM is not executed. Now, press 
the ©] key. 


[2] 20 A=0 
in ie oa 
Line number Numerical variable (Fixed variable) 


In line 2@, a value of @ is assigned to variable A as the first step of the 
program. This is called variable initialization. 
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Note that until now all lines have been numbered in multiples of 10. 
Actually, any line number between 1 and 9999 can be used in the 
PB-770. Numbering the lines of a program in multiples of ten makes the 
program easier to read and modify. 

Line 20 can also be expressed as follows. 


270 LET A=0 See page 195. 
LET is an optional assignment command. 
Now, press @]. 
[3] 30 Un ee NUMBER” ~ See page 189. 
Line Input Message Variable 
number command statement 


Since INPUT is an input command statement, execution is not shifted 
to the next line unless the input of a numeral or character is performed 
by a key entry. A numeral or character that is entered is assigned to 
the variable following the message statement, and execution proceeds to 
the next line. 

Although the message statement can be omitted, it is used to tell the 
operator what kind of data should be input. 


When ‘“;” is placed after the message statement of INPUT, ‘‘? ”’ is 
displayed after the message. If ‘‘ , ’’ is used, “‘ ?”’ is not displayed. 
Now, press (J. 


[4] 40 A=A+1 


Variable A is a counter that keeps track of how many times execution 
is performed for each entered value. Variable A is initialized to Q in line 
20. The first execution of line 40 performs A=A+1 (A=0+1), so the value 
of A is set to 1. 

When line 4@ is executed at this time (A=1), A=A+1 (A=1+1) is perform- 
ed and A takes on a value of 2. The value of A will increase by 1 each 
time line 40 is executed. No matter what the value of A at the end of the 
program, however, it is always set to @ (in line 20) when the program is 
executed from the beginning. 


Line 40 Isttime A=Q+1 
execution: 2ndtime A=1+1 


3rd time A=2+1 


Press the @]key. 
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3-7 BASIC PROGRAMMING [2] 


[5] 50 B=NXA 


This is an assignment statement (the same as line 40) which assigns the 
value of N * A to numerical variable B. When this line is first executed, 
1 has been assigned to A by the execution of line 40. An optional 
numerical value has been assigned to N by the execution of INPUT in 
line 30. 

Therefore, if N is 17, 


B= 17 * 1———— 17 isassigned to B. 


Gay In the following execution of line 50, a value of 2 is 
assigned to A the second time, 


2ndtime B 
3rdtime B 


=17*3 assigned to the numerical variable B, 
cancelling any previous value of B. 


7*2 The multiple of N is continuously 


Now let’s look at the next line. Press 2) 


[6] 60 OIF B>200 THEN 100 


Line number to which 
. a jump is made. 
Conditional expression 
Decision statement 


This is a conditional statement that says “If (IF) the value of B is larger 
than 200 (B>2Q@Q), jump to line 100.” In other words, if the value of B 
is equal to 20@ or less, execution proceeds to the next line without a 
jump. When line 50 is repeatedly executed, the value of B becomes 204 
after 12 times (17x12), B>200 is realized and a jump (branch) is made 
to line 100. 
IF expression THEN line number See page 186. 
If this expression is realized, the 
program jumps to a specified line number. 


Now press @] . 
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[7] 70 PRINT B ; See page 198. 


Numerical variable 


Screen display command 
PRINT is a display command. In this program, this command displays 
the contents of numerical variable B on the screen. The semicolon after 
B is used to keep everything displayed continuously. Because of this, the 
display called for in line 80 will occur directly after B without line 
change. 


[8] 80 INPUT “ OK” ; C$ See page 189. 


| a variable 


Input command Message 

The INPUT statement you learned in the section of line 30 is used again 
in this line to perform character key input. When line 80 is executed, 
“OK?” is displayed as a message statement by which key input of up to 
7 characters can be assigned to character variable C$. If numerical vari- 
able C is used here, a numerical value is only accepted as key input, and a 
character or @Jentry results in an SN error. 

The function of this line is to temporarily stop the display of the com- 
putation result of line 70 using the INPUT statement which waits for 
key input. If this line is not provided, many results are repeatedly dis- 
played at one time. 

Press the @] key. 


[9] 90 GOTO 40 See page 184. 


Jump ee 


This is a command for an unconditional jump to line 4Q. Press the @] 
key. 


[10] 100 END See page 170. 


END is a command that terminates the program. END is an essential 
command for a program because if a subroutine follows, the subroutine 
is also executed. (See page 18 for subroutines.) 

END can be inserted in line 60 as follows. If this is done, line 100 is 
not required. 


60 IF B>200 THEN END 


Line number to which a jump is made 
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3-7, BASIC PROGRAMMING [2] 


Let’s observe the program flow as shown in the flow chart below. 


20 Set the counter value to QO | —— A= (Initialization) 


3 Input value to be —= INPUT statement 
multiplied 

40 Count —-~ A=At1 

50 Multiple computation —- B=NX*A 


10 Comment statement —- REM (Remark) statement 
i) 


Program termination 


60 YES be 
Loop Multiple > 200 —= condition 
NO 

70 Display multiple —- Displays the contents of B 

- Stops the display with an 
80 Check display ~~ INPUT statement 

- Returns to following com- 
90 Jump to line 40 er putation 
100 Termination 


Line 90 causes an unconditional jump (jump is always performed) back 
to line 40, so the program is continuously executed between these two 
lines. This execution is exited to line 100 by the conditional statement in 
line 60 when the product of the multiple times the input value exceeds 
200. 
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EXERCISE 


= Prepare a program to compute the accumulated sum of a series of 
input numerical values. 


(1) Clear all variables to make them Q. 

5 Request input of a numerical value. 

‘ Add the numerical value to the sum of the previous numerical values. 
(4) Display the result. 


| Answer fie? Vs 


2Q@ INPUT “DATA =";A 
30 B=BHtA 

40 PRINT “TOTAL =";B 
50 GOTO 20 


Explanation 


CLEAR in line 1@ is a command that clears all numerical and character 
variables. In this case, only variable B would be cleared by B=0. If the 
GOTO command in line 50 causes a jump to line 10, the variable becomes 
Q@ and accumulation cannot be performed. 
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3-8 PROGRAM EXECUTION 


Now the program that was input has been checked. 

Let’s execute this program. 

Press the @&) key and the (is) key first. Then enter the program execution 
command (8) ©) (%) ©) . Ifa program is written in the PQ area, ® 
functions the same as RUN : 

If program input has been correctly performed, the following will be 
displayed. 


RUN 
NUMBER ?_ 


The input of a value is requested. Perform the following key operation. 
17 &] 


Then the following will be displayed. 


RUN 


NUMBER ? 17 
17 OK ?_ 


The display shows that the minimum multiple of 17 is 17 and confirma- 
tion is requested. Press the @] key to display the next multiple. 


RUN 
NUMBER ? 17 


17 OK ? 
34 OK ?_ 


Press the @) key for the next multiple. After this, multiples up to 187 
will be displayed by repeating this operation. If you press the @) key 
again and the next multiple does not appear, the conditional expression 
in line 6@ has been fulfilled. Since the multiple exceeds 200, program 
execution terminates. To execute the program again, press (R)@)(®) ©] 
again. 
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Program Modification Program Execution Sequence 


Further program modification will help NUMBER? 17 
to learn more about the use of various 47 OK? 
commands. 

First, multiples up to 30@ can be obtain- 34 OK’ 
ed by changing B>2Q@ in line 60 to B> 51 OK? 
300. Line 6@ can be displayed by cs) 68 OK? 
60 @]. Move the cursor to the position 
and change 200 to 300. Next, press the 85 OK? 
@] key and key. Then enter (rR) (0) (§) 102 OK? 
e) . 419 OK? 
Let’s check how the display is changed ° 
by changing the PRINT statement in aoe ees 
line 70. 153 OK? 


Line 70 reads ‘PRINT B;’”. The semi- 
colon after B functions to continue the 


17Q@ OK? 
display as you already know. Now, let’s 187 OK 


delete the semicolon. 


caM& 70 & 


Ready PO 


Move the cursor to the position at “ ;’’ and press the 68) key. Note that 
‘“;” disappears. Press the @] and @) keys and run the program. 

The message statement “OK?” will now be displayed under the multiple. 
In other words, since “ ;’”’ is gone, the next character is not displayed in 
the same line, it is displayed in the next line. 
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3-9 DISPLAY SCREEN CONFIGURATION 


Now, let’s learn some techniques of screen display control by chang- 
ing line 70 of the program that was prepared in the previous section. 


70 @ 


The following display should appear. 
70 PRINT B See page 198. 


Let’s display variable B together with variable A which is used as the pro- 
gram repeat counter. 


[1] 70 PRINT A;B; 
Move the cursor to the position of variable B and enter —— 
Now a 2 character space is provided before B. Enter (4) (in) GS) GA cD 


Don’t forget to finally press @]. Press , and then execute the pro- 
gram to check the display. Next, make the following modification. 


(GF cep cD 
| Co | 


[2] 70 PRINT A,B; 


To make the modification, press the key, display line 70 in the edit 
mode and use the cursor keys as outlined above. Finally, press the 

key and then run the program again. 

The line change is performed by ‘‘A, B;”. 

Let’s make another modification. Press 


[3] 70 PRINT A ; TAB (8) ; B; 


After the modification, execute the program. 

The TAB (8) function moves the cursor to the position which is speci- 
fied by the number inside (_ ). Confirm there is a space between the 
display of variables A and B. Notice that when 3 numerals are displayed 
for variable B, the left side is aligned and the last character is shifted as 
shown below. 
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Since this is a display of a multiple, there is no problem here. However, 
when a quantity or price is displayed, the right side should be aligned. To 
produce this display, the program should be rewritten using the USING 
function. 


[4] 70 PRINT A; TAB (8); USING “###” ; B; 


See page 263 for details on USING. Now, execute the program to check 
the display. 

The LOCATE command also controls the screen display. Let’s rewrite 
line 70 using this command. 


[5] 70 CLS ; LOCATE 5 2 ji PRINT A; B; »=«e« A line in which two or 


more commands are 
Command Command Command connected. byt: ts 


called a multistatement. 


Don’t forget to press @] after any modification. The display as shown 
below. 


1°17 OK 


The display appears at the center of the screen. 
The LOCATE command is used as follows. 


LOCATE X, Y 
X indicates the column and Y the line where a character is to be 
displayed. 


See page 196 for details. 
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3-10 REPEAT PROGRAM EXECUTION 


A “routine” is a task within a program that needs to be repeated a speci- 
fied number of times. For example, we may wish to check a large volume 
of data to find a specific character or value. Or maybe we need to 
arrange data in some kind of order. Whatever out requirements, we can 
have the computer go through all of the present data to compare it 
against another value, to compare it with neighboring data, or to rear- 
range everything. The commands included in this section are essential 
for such applications. 

Let’s start with a simple program. Check which program area is empty 
before inputting the program. 


wsEM ed] See page 151. 
Lees 


The following display appears after this entry is made. 


P ¥Y23456789 ANGLE Q@ 
8KB 4720B 


Ready P@ 


The numbers of program areas that have already been used to store pro- 
grams or data are replaced with @’s. The example display above shows 
that program areas @ and 1 contain programs. The 8KB indicates the 
total RAM capacity. The 472Q0B indicates that there are 4720 bytes of 
remaining RAM capacity available for use. Of course, this number would 
be higher if RAM expansion packs were being used. 

A number from @ through 2 appears after ANGLE to indicate the angle 
unit (see page 154). This value does not influence ordinary computations, 
and is always @ (DEGREE) when the power of the unit is switched ON. 
Ready PQ indicates the presently designated program area. In this case, a 
program can be written in program area @. Since program areas Q and 1 
are already occupied in this example, we would enter PROG, followed 
by a value from 2 through 9 and then @] . 

Now, input the following program. 


10 CLS 

20 FOR A=1 TO 20 
30 PRINT CHR$ (254); 
40 NEXT A 


55 


CHAPTER 3 “BASIC” REFERENCE 


Enter the following to display the first line of the program and confirm 
correct input. 


i @) —————— Specifies the EDIT mode 
Advance to the next line by line by pressing @). 
After “Ready PQ” appears on the display, run the program. 
This program displays <=: 20 times continuously. 
Now, let’s learn the new commands included in this program. 
[1] 10 CLS 


CLS is a command that clears the screen and moves the cursor to the 
upper left corner. It is used to prepare the screen for the next display. 


[2] 20 FOR A=1 TO 20 


30 PRINT CHR$(254) ; 


40 NEXT A 


Line 20 and line 40 are actually a single command. 


FORA=1TO20 ............ Sequentially assigns a numerical 
value from 1 to 2@ to variable A. 
NEXT Asc goes ot tee ek If A < 20, 1 is added to the value 


of A and areturn is made to FOR. 


This is called a FOR-NEXT loop. Let’s follow the execution procedure. 

(1) 1 is assigned to A. 

(2) Execute line 30. 

3) NEXT A in line 40 checks if A<20. 

4) Since A=1, execution returns to line 20 and 2 is assigned to A. 

5) Execute line 30. 

6) Check if A<2@ in line 40. 

(7) Since A=2, execution returns to line 20 and 3 is assigned to A. 

(8) When the value of A finally reaches 21, the line following the NEXT 
statement is executed. In this example program there is no line after 
NEXT, so program execution terminates and “Ready PQ”’ is displayed. 


Now let’s look at line 30 which is repeated 2@ times in this program. 
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[3] 30 PRINT CHR$(254); See page 245. 
. e 
Display CHR$ (254) err line 


All characters and keys are assigned code numbers ranging from @ through 
255, and CHR$ (254) is the function that specifies character code num- 
ber 254 ( =: ). (See table on page 327.) 

Since =: cannot be entered directly by pressing a key, it is specified by 
the function CHR$ (254). This function is essential for specifying such 
symbols and graphics. ““CHR$ (”’ is entered using 5 2): 


EXERCISE 


= Prepare a program in which the integers from 1 to a specified number are 
continuous displayed using FOR-NEXT. 


Gm) FOR A=1 TON 
§ 
NEXT A 


GSE 10 cls 


20 INPUT "NUMBER"; N 
30 FOR A=1 TO N 


40 PRINT A; 
50 NEXT A 
60 END 
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Explanation 


To provide for the input of an optional numeral in line 20, “NUMBER?” 
is displayed as a message statement. The entered value is assigned to 
variable N and the number of repeats is specified in line 30. For example, 
if the value 15 is entered, line 40 is executed 15 times. 

The variable used by FOR-NEXT is displayed in line 40. This program 
shows that 1 is added to the variable of the FOR-NEXT command each 
time the loop is repeated. 
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3-11 SUM TOTAL PROGRAM 


The FOR-NEXT loop introduced in the previous section requires some 
time getting used to, so let’s try another program. 

This time, let’s use program area P4. Use the procedure already outlined 
to designate the program area. Enter NEW, then @], and we’re ready to 


go. 


This program computes the cumulative cost of a series of articles with 
different unit prices. Subtotals for each article are also provided. The 
total number of different articles is input at the very beginning of the 


program. 


10 
20 
30 
40 
5 
60 
2 
80 
ss} 2) 
100 


CLEAR 

INPUT "NUMBER OF ARTICLES";N 
FOR A=1 TON 

INPUT "UNIT PRICE";B 

INPUT "QUANTITY';C 

PRINT "SUBTOTAL"; BXC 

D=D+BxXC 

NEXT A 

PRINT "TOTAL"; TABC1@);"$"5D 
END 


The processing in each line of this program is as follows. 


10 Clears all variables (assigns @ to all variables). 
20 Requests input of the number of articles (Assigns the number of 
articles to N). 


30 


Unit price and quantity are requested for the number of times 
specified by N. After each input, the subtotal is displayed and is 
added to the total. 


80 


90 Displays the total amount. 
100 Termination 
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Let’s analyze the FOR-NEXT loop from line 30 to line 80 in detail. 
The task to be performed in the loop from FOR to NEXT is as follows. 


(1) The unit price is input and assigned to variable B. 

(2) The quantity is input and assigned to variable C. 

(3) The unit price is multiplied by the quantity and the subtotal is 
displayed. 

(4) The subtotal is added to the cumulative total. 


In line 90 of this program, an easy-to-read display can be obtained. 
90 PRINT “TOTAL”; TAB(10); “$" ;D 


Displays total. Takes 10 Displays $. Displays total 
spaces. amount. 


Let’s rearrange the program based on a subroutine concept. The funda- 
mentals of the subroutine are shown below. 

The command used for this procedure is GOSUB-RETURN. 

Line 40 to 70 in the previous program are changed to lines 500 to 540, 
and GOSUB 500 is inserted in line 4Q. 


Main routine Subroutine 
GOSUB 500 | 
40 GOSUB =e 
Go to the subroutine at line 500. 520 
530 
RETURN 540 


RETURN 


Return to the command following GOSUB. 


Lines 3@ to 80 are modified according to the above as follows. 


30 FOR A=1 TO N 
40 GOSUB 500 
SO NEXT A 
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And now our program looks like this: 


10 
20 
30 
42 
58 
60 
42) 
580 


510 
920 
930 
940 


Input this 


CLEAR 

INPUT "NUMBER OF ARTICLES";N 

FOR A=1 TON 

GoSUB 52a } FOR-NEXT loop. Repeats N times. 
NEXT A 

PRINT "TOTAL"; TABC1@)3 "$"3D 

END 

PRINT A; TABC5); "UNIT PRICE"; ? INPUT 

B 

PRINT A; TABC5); "QUANTITY"; : INPUT C_ | Subroutine 
PRINT "SUBTOTAL";BxC:BEEP 1 

D=D+BxXC 

RETURN 


program in a new program area. Confirm the difference in 


execution between this and the previous program. 
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3-12 CHARACTER VARIABLES 


Before getting into the actual storage of large volumes of data, let’s first 
have a look at how character data is handled. As has already been men- 
tioned, variables are roughly divided into two categories: numerical vari- 
ables (such asA,B,C,A1) to which only numerical values can be assigned, 
and character variables (such as A$, B$, A1$) to which characters and 
symbols can be assigned. 

Since numbers as well as symbols and alphabetical characters can be 
assigned to character variables, the difference between the two types of 
variables may not be clear. It should always be remembered, however, 
that a numerical variable expresses a quantity, whereas a numerical value 
in a character variable expresses the character only. 


For example: 


(Numerical value) (Character) 
4 +3 (Ener) — 7 rear 4 63) [ENTER] —» 43 


As can be seen on the right, the assigned characters are enclosed in quo- 
tation marks the same as messages with the INPUT and PRINT com- 
mands. The result of adding two characters is a string that contains the 
two characters. A numeral treated as a character can be converted to a 
numerical value using the VAL function (see page 247). 

In the following section we will be discussing the use of character vari- 
ables in arrays. Each element of a character array usually holds up to 16 
characters, but can be specified to hold up to 79 characters. 
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Character arrays are specified as follows. 


DIM FS (5) * 30. 


t ) : 
Character variable | Maximum number of characters per variable 
Number of data 


Memory area is conserved by speci- 
fying the maximum number of 
characters per variable. When 30 is 
specified as above, the required 
memory is computed as follows. 


50 X (30+1) = 1550 
Number of characters + 1 


180 28 30 46 56 60 76 79 
] l l 


nn 

Lf 
BEN STs EM Ry hl LR A Le 
WORM BWDP 
a 2 Se 


The less the memory used per variable, the more overall memory space 
available. With numerical variables, the selection is between single- 
precision and half-precision variables. A half-precision numerical array 
requires only half the memory as a single-precision array. This will be 


explained in the following section. 
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3-13 WHAT IS A DIMENSION? 


The word “dimension” can often be heard when talking about computer 
programs. A dimension can be thought of as a kind of container or shelves 
as shown in figure (2) below. Data (such as numerical values or charac- 
ters) can be stored on these shelves for later retrieval. 

In this example, 5 shelves are prepared under 1 variable name. If we store 
“Smith” in A$(0), “Johnson” in A$(1) and “Foster” in A$(2), we can 
then recall these data by specifying the variable name and control num- 
ber. Different data can be included under A$. Without arrays, each piece 
of data would require its own variable name as shown in figure (1) below. 
This would make it difficult to keep track of data and would result in 
inefficient programs. 


(1) 1 data item per variable — (2) 1 variable name holds 
inefficient numerous data items — 
1-dimensional array 


(Address) 
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= 1-Dimensional Arrays 

The method shown in figure (2) is known as a 1-dimensional array, and 
is very handy for inputting large volumes of data. Although only 5 
shelves were used for the example, up to 256 (@ — 255) shelves can be 
reserved per variable name. 

Before an array is used, shelf space must be reserved. Attempting to 
place data on a shelf (in memory) without this preparation will result in 
an error (UV error). 


(3) Directory using 1-dimensional arrays 


=. =e eas 
— Address |-—~_TEL NO. | 


Oe ee 
[— Name | Address_ | _TEL NO. | 


(Address) 


(4) 2-dimensional array 
(Address) 
A $ (Horizontal) 


(e914aA) $ 


(Address) 
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= 2-Dimensional Arrays 

Based on what we already know about 1-dimensional arrays, we could 
construct a directory using a series of variables. In figure (3), we see that 
names are assigned to A$, addresses to B$ and telephone numbers to 
C$. To find out a person’s telephone number, for example, we would 
input the name and then use the resulting A$ shelf number to find the 
right shelves in B$ and C$. A specific shelf can be specified by indicating 
the horizontal variable name and the vertical control number. 

Another means to accomplish the same result would be to use what is 
known as a 2-dimensional array as shown in figure (4). This type of 
arrangement allows the vertical and horizontal arrangement of data 
under a single variable name. Up to 256 rows and columns (@ — 255) can 
be specified, but, due to memory limitations, a 256 x 256 array is impos- 
sible because the memory required for a 2-dimensional array is: 


Number of vertical addresses x number of horizontal addresses 
x number of required memories per address 


A 256 x 256 array that allows 16 characters per variable would require: 
256 x 256 x (16+ 1) = 1114112 bytes 
Of course, in this case a memory overflow error would be generated. 
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A numerical array is used when storing numerical values on the shelves 
described in the preceding section. A variable name (in the case of arrays 
called an “array variable”) such as the A$, B$ and C$ of the previous 
section is used. The array variables for numerical and string arrays are 
basically the same for control purposes, but data handling and expression 
within a program are different. 

First let’s prepare a program using a numerical array variable to set up a 
]-dimensional array like we saw in the previous section. Since this set of 
shelves will hold numerical values, the array variable must be an alpha- 
betical character. Let’s call this array “‘A’’, and create a total of 7 shelves 
from @ through 6. 


(1) Array variable A configuration and expression 


A 


DIM A(6) used to set up shelves 


NOTE! 

Seven data items are 
numbered from 0 
through 6. 


67 


CHAPTER 3 “BASIC” REFERENCE 


The following is used to prepare shelves 0 through 6 under array variable 
A. 


Numerical array name 


DIM A(6) J 
t 


Dimension 1-dimensional array 


command with 7 shelves 
(Q through 6) 


Specifying the above sets up array A and initializes all arrays in A to Q 
(empties all of the shelves). If a DD error is generated when a DIM com- 
mand is entered, enter CLEAR @] and repeat. 

Now let’s store some data on the shelves. 


A(5)=-13 @& 


Address 5 in array A 
A(3) =65 @) 


Now let’s confirm that the data are assigned to the specified shelves. 


A (5) = —13 displayed 
A (3) = 65 displayed 


The operation outlined above can be included in a program as follows. 


5 CLS 

1@ CLEAR 

202 DIM A(6) 

30 INPUT "A(5) ="; A(5) 
4Q INPUT "A(3) ="; A(3) 
5@ PRINT A(5);A(3) 
6Q END 
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= Numerical values assigned to array variables 

Certain restrictions exist concerning the numerical values that are assigned 
to array variables. The first important thing to remember is that up to a 
12-digit mantissa and 2-digit exponent can be assigned to each array vari- 
able. Values are displayed, how- 

ever, up to 10 digits founded): 
Internal computations are con- 
ducted with 12 digits. 

A numerical array as described 
above is said to be “‘single- 
precision”. Often, however, 12 
significant digits are not required 
for computations and 1@ digits are 
not necessary fOr the display. 
Therefore, ‘‘half-precision” pro- 
cessing can be used in which values 


are stored only up to 5 digits. As the names imply, the memory space 
required for a half-precision data item is one half that necessary for 
single-precision data. The difference between single-precision and half- 
precision is shown in figure (3). 


(2) Array numerical values 


2 digits 
(12 digits) 


Everything past the 12th digit discarded. 


(Display) 

Numerical values up to 100 digits long can be expressed by the 
PB-770. Even larger digits can be displayed depending upon the 
program. Once 10 digits are exceeded, however, values appear on 
the display in exponential form. 


12345678909 ™ 1.234567891 E 10 


t Lo t 
Mantissa ie Exponent 
Rounded 


Exponential form represents: a number x 10!®. In the above 
example, the display means: 1.234567891 x10" 
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(3) Single and half-precision shelf size 


Half-precision Single-precision 


4 bytes are used 
per shelf. 


i . 
I 
(Address) (Address) 


Numerical value of a 
5-digit mantissa and 
2-digit exponent can 
be stored. 


Single-precision dimension is expressed as follows. 


A(i) ..... Single-precision numerical array 


8 bytes are 
used per shelf. 


Numerical value 
of a 12-digit 
mantissa and 2- 
digit exponent 
can be stored. 


A half-precision dimension is expressed using an exclamation mark 


after the variable. 


A\(i) .....half-precision numerical array 
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® Single-precision and half-precision in a 2-dimensional array 
The precisions of 2-dimensional arrays can be regarded the same as those 
for 1-dimensional arrays. An example is shown below in figure (4). 


DIMA! (i,j) ....... Half-precision 
DIMA(i,j) ........ Single-precision 


(4) Half and single-precision 2-dimensional arrays 


DIM A! (7,7) DIMA (7,/) 
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Let’s prepare a program for a totalization table. Column and row sub- 
totals are to be computed, and a grand total is obtained at the end. The 
table is 4 x 4, so 16 pieces of data are used. 


A-1 A-2 


Subtotal 


A-3 A-4 Subtotal 


Since numerical data are used, let’s prepare a program with a 1-dimen- 
sional numerical array. Let’s select A as the variable name. Now, let’s 
prepare the program according to the following flow chart. 


oy 


_ 
_ 


8 Totalization of row 3 
9 Totalization of column A-1 
10 Totalization of column A-2 
Totalization of column A-3 
12 Totalization of column A-4 
13 Row subtotal display 
14 Column subtotal display 


15 Grand total display 
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Let’s prepare a program to input each column of data as shown in 1 to 4 
of the flow chart. 


10 CLEAR 

2Q@ DIM A!(15) 

30 FOR I=02 TO 3 
40 INPUT A!(I) 

5@ NEXT I 


FOR-NEXT loop 


In this program data is entered from A!(0) through A!(3) (column A-1), 
but how do you enter data to columns A-2 through A-4 without changing 
the variable name? The following shows what we are trying to accomplish. 


—> J Subtotal 
| [ann [ane [anor fauna [aun 
| 


If we look at the relationship from column to column, we can find the 
following pattern. 


Al(x) A!(x+4) A!(x+8) AL(x+12) 


Now all we need is a routine that will add 4 to the loop counter each time 
we want to move to the next row. This can be accomplished using the 
nested loop shown in lines 40 through 90 below. 

1Q@ REM INPUT 

20 CLEAR 

30 DIM A!(15) 

40 FOR J=90 TO 3 

50 FOR I=0 TO 3 

Data input by 
6Q@ PRINT "A-—";J+1;""315")"3  Icotumn _ shifting se- 
ially f 
70 INPUT AI(J*4+1I) aia Detinnw Os 
80 NEXT I 


9@ NEXT J 
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Let’s see how this works. The first value of J and I is 0. J will retain the 
value of Q for the next three passes of |. Line 60 results in a display of 
‘“A—1 (@)” because both J and | equal @. Line 70 waits for an input for 
A! (Q) since @*4+0=90. 

On the second pass of I, J still equals @ but | now equals 1. Therefore, line 
60 displays ‘““A—1 (1)” and line 70 waits for an input for A!(1) since 
@x*x4+1=1. 

Let’s take a look farther down at A!(14). In this case, J=3 and I=2. Line 
60 displays ‘“A—4 (2)” and line 70 waits for an input for A!(14) because 
3*4+2=14. 


This completes the data input program. Data is sequentially entered with 
the display of ‘“A—Column No. (Vertical No.)?’’ Data is stored in 
array variable A! (_ ) in line 70. 

Now, let’s prepare a program for the row subtotal. 


95 DIM BI(3) 
100 FOR I =0 TO 3 
110 FOR J=0 TO3 Row Seve UE TG 
120 BI(1)=B1(1) FAI(U 4+ 1) [eEmBation| Siting vertically 
130 NEXT J 
140 PRINT "B-—"; I; TAB(5);B!(1) 
150 INPUT "OK"; FS 
160 NEXT I 


Data is stored to array variables B!(@)—B!(3) in line 120, and is dis- 
played in line 140. To prevent display of the subtotal of B!(0)—B!(3) 
from scrolling, the_display stops in line 150, and the next display is 
made by entering 2). 

Now, prepare a program for the column subtotal. 


172 DIM C!(3) 
180 FOR J=0@ TO 3 


190 FOR I=92 TO 3 Computes and dis- 
pl btotal b 
200 CK(VI=CI(U)FAM UK 441) [Column Enitting hori 


zontally four 


210 NEXT I ancumiey | lesen 
220 PRINT "C—"; J; TAB(S) ; Cl(J) 

230 INPUT "OK"; FS 

240 NEXT J 
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This is almost the same as the row subtotal method using nested FOR- 
NEXT loop with a different sequence of variables (loop control vari- 


ables) | and J. 


Now, let’s compute the total. 


250 
260 
270 
280 
290 
300 


REM TOTAL 

FOR I1=@TO3 

D = D4+C!(I) 

NEXT I 

PRINT "TOTAL=";D 
END 


Programming With A 2-Dimensional Array 


The handling of each shelf where data is to be stored is complicated and 
difficult to understand when a 1-dimensional array is used as previously 
explained. Let’s prepare a program using a 2-dimensional array which is 
much more convenient for handling column and row data. 


[1] Initialization 


1@ ERASE A! . Clears the array of variable A. 

20 CLS . Clears the screen. 

38 N=4 .... The number of column or row items. 

40 DIN A!CNsN)_.... Dimension declaration (The declaration of half- 


precision numerical array). 


The number of column and row items can be changed by changing the 


value of N in line 30. 
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Data Input 


Row total 


5@ FOR 1=@ TO N-1 


—> J 
ee Tae ‘| s3| 23] 55] 20] 167 
53| 29] 55| 30 
7@ PRINT 13"-"3J3 i aa 
go INPUT RE CToD ral s[m 
9@ NEXT J 
1aa NEXT 1 joo| | 70] a | as 
cam veo [|e 
total 
N—1 is used in lines 50 and 6@ because row and column totals are not 


required for data input. Note that data are entered in rows and not verti- 
cally as with the 1-dimensional array. 


Row Subtotal 


11@ FOR I1=@ TO N-1 
120 FOR J=@8@ TO N-1 


J 


130 A!CINI=A!CISNDFA' CII) I | |thisrow —- 
140 NEXT J 
15Q NEXT I 


Row subtotals are computed four times (when N=4). Manually go 
through this routine to confirm that all values of A!(_) are accounted 
for. 


[4] Column Subtotal 


16@ FOR J=@0 TO N 

17@ FOR I1=@8 TO N-1 

188 A! CN; JX=A!CNs JOtA! CIs JO 7 
19@ NEXT I 

288 NEXT J 


Column subtotals are computed four times (when N=4). Again, manually 
go through this routine to confirm that all values of A!( ) are ac- 
counted for. 
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[5] Row Subtotal Display 


210 FOR 1=@ TO N-1 
228 PRINT A!C15N)3 
23@ NEXT I 

24@ STOP this row 


Display of 


The program stops once and confirms each row subtotal. Then, execu- 
tion proceeds to the next line after iM <5] is entered. 


[6] Column Subtotal Display 


250 FOR J=@ TO N 
260 PRINT A!CNs JO; 
270 NEXT J 

280 END 


This routine displays the sum of all of the column subtotals. Since the 
subtotal of the column at the far right is actually the total of the row 
subtotals, the result is a display of the sum of the entire table. 


The most difficult point of this program was the double FOR-NEXT 
loops (commonly called ‘“‘nesting’’). But after using this technique a few 
times, its value will soon become evident. Just remember that the FOR- 
NEXT loop automatically increments the value of control variable with 
each execution. 
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Program Execution 


When you run the program, “O—O?” is displayed which requests data 
entry. Enter Data ©], then data entry for the next row is requested by 
“Q—1 he 

When all data input has been performed the row subtotals and “STOP 
PQ@—240”’ are displayed and the program stops. fon 
Next, the column subtotals and total are displayed by entering 
~@] and the program is terminated. Try several different display formats. 


= Control variables 


In the routine for the row subtotals, the values of control variables 
change as follows. 


11@ FOR [I]]=@ TO N-1 
12 FOR [J]=@ TO N-1 


Control variables 


130 A! CIN) = AIC N) + AN) 


| and J are control variables 
of the FOR-NEXT loops. 
They change from @ to 3. 


When | =0, J =0 andN =4, 
A! (0, 4) =A! (0, 4) +A! (0, O). 
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Characters can also be assigned to 1-dimensional and 2-dimensional 
arrays. With numerical array variables, single and half-precision can be 
specified for efficient use of memory, as described before. Character 
array variables can also be used with the string length specified. 

Storing a string that is shorter than 6 characters in an array specified for 
more wastes memory. Attempting to store a string that is longer than the 
specified array capacity will generate an error. Therefore, it is important 
to determine the string length of the array being defined. 

The number of characters per character array variable is specified as 
follows. 


DIM AS(i) ®¥ Nn (1 Sn<79) 


* If Kn is omitted, the number of characters 
is specified to 16 characters. 


16 character spaces 


8 character spaces 


ee Up to 16 characters 


p_ Character indication 
a | 


DIM AS (3) DIM BS(2)*8 


As oy 
Character array ee | I shelves (arrays) Number of characters specification 
from Oto 3. (from 1 to 79 characters) 


* Since *n is omitted, the number of characters is specified as 16 characters. 
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Let’s enter characters in an array variable. Perform the following opera- 
tions. 


CLEAR @] 

DIM H$(30)*5 j@] 
H$(1) = "ABCD" @] 
H$(2) = "EF" J) 


When you execute these entries, the characters 
are stored in the array variable as shown in the 
figure on the right. 

To recall these, perform the following operations. 


H$ (1) (exer) «=6m = =©ABCD 
H$(2) (exer) o> )~=—SOEEF 


= DIM statement error 


Attempting to enter a string that is longer than the size specified by a DIM 
statement results in an error. 


ST error 


At this time, reenter the string keeping it within the defined range. 

Attempting to define an array that has the same name as a presently defined 
array will also result in an error (DD error). For example, this error would be 
generated if the statement 


DIM A$(20) were input followed by 


DIM A$(30) 
When this happens, erase A$(__) using the ERASE command. 
ERASE A$ @) 


It should be noted, however, that the ERASE and CLEAR commands erase 
data. 
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# String Array Programming 
Exercise 


Prepare an array program with 3 arrays in which up to 10 characters can 
be stored respectively. Characters are to be entered by character codes. 
To stop input in the middle, @ is to be entered. When the entry for 3 
arrays has been completed, all characters are displayed. 


Since initialization is with up to 10 characters and 3 arrays, 


10 CLEAR 
20 DIM N$(2)*10 


The data input routine comes next. Since there are three arrays, prepare 
three FOR-NEXT loops and use another loop specified by a GOTO 
Statement to read 10 characters. Include an INPUT statement in the loop 
to read character codes. 

The basic configuration of the data input program is as follows. 


(1) Set the counter to O for the number of 


characters per variable .................. B=0 
(2) Input a character code ................. INPUT N 
(3) Add 1 to the counter for the number of 
CHAlaCters cw ode ew hea oS hae hoe BRB] 
(4) If the counter exceeds 10, input character 
codes to next array. ............ 200 eee 1F B= 10 THEN ~ 
(5) Convert a code number to a character and 
store it to an array variable .............. NS$( 1) = N$( 1) + CHRS(N) 
(6) Returnto (2) ............ 0... eee eee GOTO ~ 


The routine for displaying the result comes next. Provide a display of 
N$(®)—N$(2) on the same line. 


100 FOR I=0 TO 2 
11Q@ PRINT NSC1) 5% "3 eee Q to 2 is sequentially entered 
1420 NEXT I 1k 
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12 
20 
30 
40 
45 
08 
68 
78 
1% 
38 
10 
112 
120 
130 


CLEAR =CLS 

DIM N$C2)xk1@ 

FOR I1=@ TO 2:B=@ 

PRINT "N$C"3 15 ")"32 INPUT “ No. "3N 
IF N>255 THEN 4@ 

IF N=@ THEN 9@ 

B=B+1i-IF B=1@ THEN BEEP -GOTO 9@ 
N$CTID=NS$CIDO+CHRS COND © 

GOTO 4@ 

NEXT I 

FOR I=@ TO 2 

PRINT N$CI)D3" "5 

NEXT I 

END 


When you execute this program, ‘N$(.0).WNo.?_” is displayed. 
Now enter the character code. The numeral enclosed by parentheses of 
“N$(I)” is changed from Q to 1 to 2 by entering 0 @). 

Now, enter the following codes and see what appears. 


67 Bes Mas A732 H79 40 Me7 4) 
79 @)77 @) 80 @) a5 2) 84 ZJeo) 
82 Zio @)s0 Bee @ssGadasd4sado@_g 
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3-17 COMBINATION OF STRING 
ARRAYS AND NUMERICAL ARRAYS 


In most cases when data is processed by preparing a table, a combination 
of string and numerical arrays is used. In this case, characters and numer- 
ical values must be handled at the same time as one data group. 

For example, in regard to a name and score, or the names of articles, 
number of articles and an amount, characters and numerical values must 
be recalled at the same time. 

Let’s prepare a result processing program as an example. First, a 1-dimen- 
sional character array to store names is required. Then a 2-dimensional 
numerical array is required in which the total score for three subjects 
(English, mathematics, and science) corresponding to the name is stored. 
The following model can be assumed based on the items mentioned 
above. 


/ 


45 people 


\ 


D$ (45) Average score D! (45,3) 


0 = English 

1 = Mathematics 

2 = Science 

3 = Total of 3 subjects 


The data to be entered is as follows. 


Average 
score 
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[1] Name Input 


1@ ERASE D$;D!: CLS 

208 DIM D$¢645)18;D! (45; 3) 
38 I=0 

4@ INPUT "NAME ";D$c¢1) 

5@ IF D$CI)="END" THEN 8@ 
6@ I=I+1: IF 1=45 THEN 8@ 

7@ GOTO 42 


Names are stored in D$(@) to D$(44) and the average score is stored in 
D$(45). The execution is exited from the loop by inputting ‘‘END”’. Of 
course, lines 40 to 70 provide the loop for name input. 


Numerical Value Input 

The following is a routine that enters numerical value into a 2-dimen- 
sional array. Line 90 displays a student’s name in D$(Y), and line 120 
inputs the English score in D!(@,0) (when X=@). Then line 13 adds the 
score to D!(Q,3). D!(Y,3) is the subtotal of the row since only three 
subjects are being handled here. The number of elements can be ex- 
panded by changing the 3 of D!(Y,3) to “1 + the number of elements”’. 
X,Y of D!(Y,X) are determined by the frequency of the FOR-NEXT 
loop. 


FOR Y=02 TO I -1 
a X=@ TO 2 


INPUT D!(Y, X) 
NEXT X 


NEXT Y 
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AND NUMERICAL ARRAYS 


The basic input format is shown below. 


8@ FOR Y=@ JO I-1 —< sicakapaual 
9@ PRINT D$CY? Meth: 
10@ FOR X=@ TO 2 | (0) (1) (2) 

a a ae 
a a a 
ne a a 
2 ee 


110 PRINT X y 
120 INPUT " ";D'!CY;X) 

138 D!CY,3)=0! CY, 3)9+D! CY X) 
14@ NEXT X 

150 NEXT Y 


Average Score For Each Subject 


No matter how many names are input (counted by I), D!(45,X) is speci- 
fied to store the average score for each subject. In line 180 the cumula- 
tive points for each subject are assigned to D!(45,X). In line 20@ the 
average is assigned to D, and in line 21@ the decimal part of D is rounded 
off to one place and then reassigned to D!(45,X). INT is the integer func- 
tion in which values below the decimal point are discarded. 

This function is used because of characteristics of test result processing. 
If used for other purposes, line 210 can be changed. 


160 FOR X=@ JO 3 

170 FOR Y=@ TO I-1 

180 D!¢453 X)=D! 645) XI+D! CY) XD) 
19@ NEXT Y 

200 D=D! (45> Xz] 

218 D!¢45)X D=INTCDK10+0.5)710 
220 NEXT X 
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[4] Total Score Display For Each Name 


The total score for each name is displayed. After you press @Jin line 
260, the program proceeds to the next name. The total score for a name 
is processed by loop control variable Y. Therefore, the total always 
corresponds to the proper name. 


230 FOR Y=@ JO I-1 

24@ PRINT D$CY)3" T="; 

20@ PRINT D! (C33) 

260 KS$=INKEY$: IF K$="" THEN 268 
270 NEXT Y 


Average Score Display 
The display of the average score for each subject is performed by sequen- 


tially displaying data D!(45,X) from X=0 to X=3. 
28@ FOR X=@ TO 3 
290 PRINT "AVE.="; 
3@@ PRINT D! (45) ) 
310 K$=INKEY$: IF K$=""" THEN 310 
320 NEXT X 
330 END 


Execute this program and enter data. 


The display screen of execution result is as follows. 


A.Y T= 185 


_ Total score for a name is displayed sequentially each 
RR TS COA ime the J] key is pressed. 
$,0°T= 163 


AVE. = 64.3 —Average score of English(Q) 
AVE. = 64.7 —~Average score of Mathematics(1) 
AVE. = 61.7 —~Average score of Science (2) 


SoG 


AVE. = 190.7— Cumulative average of each person’s total score 
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3-18 STATISTICAL FUNCTIONS 


Statistical computation capabilities are essential to business and engineer- 
ing for analyzing data and making projections. The PB-770 features all of 
the essential statistical functions listed below, so troublesome computa- 
tions are simplified while correlation coefficients and estimated values, 
etc. can be quickly determined. 

* STAT LIST @] displays the names and values of the basic statistics 
(indicated by * below). To suspend display press ©). Pressing @] again 
will resume the display. Entering STAT LLIST @] will output the basic 
statistics to the printer. 


[Format [ [Function 


MEANY Mean of y data 
Sample standard deviation of x data nbe tear 


nKer- 


a 
Sample standard deviation of y data nd = 2 
SDXN Population standard deviation mee (Sa 


of x data 
Population standard deviation Ind y2— (Sy), 
ne 


Linear regression Dy—LRB:>x 
constant term n 


Linear regression ne DSxy—Sx-Ddy 
coefficient ne>dx?—(Sx)? 


lati ffici ee ee a) 
Correlation coefficient Spc ees = 
(numerical ne Estimated value (value of x = 


numeri 7 stimated value (value o 
EOY pisiockien estimated from x) sf EOY(x.)=LRA+2.*LRB 
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STAT CLEAR @] should be entered to clear the statistical memory area 
before new data is entered. 


# Statistical Data Input 
@ Single variable 


Individual datainput........... STAT data @) 
Multiple input of same data...... STAT data GHA) ch frequency @) 
@ Paired variable 
Individual data input ........... STAT x data G) y data @]} 
Multiple input of same data...... STAT x data G) y data ( 
frequency @] 


Data is input using the @] key, but such results as standard deviation are 
obtained using the key. Incorrect operation will result in an SN error 
being displayed. 


The table represents the shipments of articles x and y over a period of 5 
days. Calculate the standard deviation and determine the variance in the 
shipments. 


Operation: 
STAT CLEAR wJ) 


STAT2(2>]1 oS} STAT2Z.-J5 ed) STATS(>J5 oi) 
STAT8(7J5 B&D) STAT8(?JO 
STAT LIST @J) (Basic statistics will be displayed automatically.) 


Number of data items 
SUMX 25 Sum of x data 
SUMY 25 Sum of y data 


Sum of products of 
SUMAY. “ato x data and y data 


SUMX2 161 Sum of squares of x data 


SUMY2 157 Sum of squares of y data 
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Ready PO 
MEANX [ENTER Mean of x data 
MEANY [ENTER Mean of y data 
Population standard 
SDXN deviation of x data 
SDYN Population standard 


deviation of y data 


According to these statistical results, the standard deviation of article x is 
larger than that of y though the sums and means are the same. Therefore, 
it can be said that the variance in the shipment is greater for x. 


Use the following data for regression computation and determine the 
correlation coefficient and estimated value. 


The following table shows last year’s advertising expense ratio (adver- 
tising expenses/operating expenses x 100) and operating profit ratio 
(operating profits/sales x 10@) for chain of 7 supermarkets. 


eee ere 2 a Pe |e a 
Advertising expense ratio (x) | 0.8 | 2.1 | 2.5 | 1.8 | 3.1 | 4.0 | 1.0 


Operating profit ratio 


Use the table to produce a scatter diagram. 

Looking at the scatter diagram, it can be said that 
profit was directly proportional to the amount 
Spent for advertising. A line connecting the 
plots (dots) in the diagram is called a regression 
curve, and, since it is almost a straight line in this 
example, it is called linear regression. Regression 
curves are logarithmic, exponential and power 
curves, and the selection of the curve depends 
upon the relationship between the x and y data. 
It should be noted that the range of the correla- 


wo w Co on f=) 
e 


— 


pps ~—s tion coefficient (r) is —1 <r <1. The correlation 
Advertising expense is positive when O<r<1, negative when 
ratio —1 <r<@, and no correlation exists when r=@. 


Now let’s input the data for the 7 stores. 
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Operation: STAT CLEAR @] 
STATO. 82.52 stat2.10)3.4@ ]stat2.50)3.7@) 


STAT1 .8(0J3.2@)STAT3.10)4.3@ ]staT4.oCle. 3g} 
STAT1 .0C)]2.3@] 


Linear regression 
LRA 1.174221646 constant term (A) 
LRB [ENTER] 1.142512973 ete Ah 
COR @.9628252383 Correlation 


coefficient (r) 


The correlation coefficient (r) indicates that x and y have a positive 
correlation. Now let’s calculate how much advertising expense ratio is 
required for an operating profit ratio of 5.7% and how much operating 
profit ratio can be expected from an advertising expense ratio of 4.5%. 


EOX5.7 3.961248986 
EOY4.5 6.315530022 


These results tell us that an advertising expense ratio of 3.96% is required 
for an operating profit ratio of 5.7%, while an advertising expense ratio 
of 4.5% can be expected to produce an operating profit ratio of 6.32%. 
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® Logarithmic, Exponential and Power Regression 
Let’s apply the various types of regression to the data in the table below. 


@ Logarithmic regression 

The regression formula is ¥=A-+ B>elnx 

The logarithm of x is input for x data, and y data is input as it is. 

Linx, Z(Inx)? and Linxy are obtained for Lx, Lx? and Lxy respectively. 


Operation: 


STAT CLEAR @] 

STAT LOG54(-]581 O@ISTAT LOGS5(- 5637 
STAT LOG5S6(°J6736Q)]STAT LOG577)7938 &) 
STAT LOG5S8(-]81 69] 


LRA (ENTER -—-151086.86Q2 Regression constant term (A) 
LRB (ENTER 39240 .6409 Regression coefficient (B) 
COR [ENTER @.9461 867989 Correlation coefficient (r) 
COR 2 ®@.8952694585 Decision coefficient (r?) 


® Exponential regression 

The regression formula is ¥ =A+e®*(Iny=InA+B°x) 

The logarithm of y is input for y data, and x data is input as it is. 

InA, ZIny and Yx-Iny are obtained for A, SUMY and SUMY2 respective- 
ly. 
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Operation: STAT CLEAR} 
STAT 54(0]L0G5810 @) STAT 55(-)LOG56372) 
STAT 56(°JLOG6736 @)] STAT 57()LOG7938@) 
STAT 58(°]LOG8169@] 


EXP LRA 21.93154256 Regression constant term (A) 
LRB @.102384121 Regression coefficient (B) 
COR @.9442661562 Correlation coefficient (r) 


@ Power regression 

The regression formula is y = A-xB (Iny = InA + B-Inx). 

The logarithms of x and y are input for data x and y respectively. 

InA, ZInx, Z(Inx)?, Liny, V(Iny)? and Z(Inx-Iny) are obtained for A, 
Dx, Yx?, Ly, Ly? and LVxy respectively. 


Operation sTAT CLEAR@) 
STAT LOG54(>JL0G581 0] sTAT LOGS5(>)JLOG5637 4] 
STAT LOG5S6(>]LOG6736 WM] STAT LOG5S7(-JL0G7938@) 
STAT LOGS8(>]L0G8169 &) 


EXP LRA 6.651154824E-07 
LRB 5.725355325 
COR @.9433168782 
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3-19 USING GRAPHIC CHARACTERS 


The characters shown on the Character Code Table on page 327 can be 
used by the PB-770. 


(1) CHR$ function 
The word “NAME” can be displayed on the screen using the following 
command. 


PRINT “NAME” @] 
The CHR$ function can also be used to produce the same display. 
PRINT CHR$(78); CHR$(65); CHR$(77); CHR$(69) @] 
As can be seen, specifying a character code for the respective letters 
caused them to be displayed on the screen. 


The other characters can be used in the same manner. 
The following table illustrates some of the codes. 


Code Number Display | Code Number Display 


164 
° 165 
[~ 176 
al 


The following program will produce a display of 5 playing cards. 


(2) Graphic symbols 


1@ CLS 

2@ FOR I=@ TO 4 

3@ LOCATE 1x3:;1:PRINT I+3 

4@ LOCATE 1X3+1;2:PRINT CHRS$¢232+1 MO 


D 4) 
5G DRAWC1*24+4;49-C 1249420; 49-C1X244+2 


O,26)-C1K244+4; 269-C1TX¥2494+4; 492 
6@ NEXT |] 
7Q@ IF INKEYS=""" THEN 72 
8@ END 
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Execution Result 


EICICIESICS 
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3-20 DISPLAYING PATTERNS a7 


The PB-770 is capable of displaying patterns which cannot be found in 
the Character Code Table. Let’s try to display the pattern shown below. 


Display format 


AB$="FF18DB5A5ADB18FF” @] 
PRINT $AB$ @] 


After the above noted key operation, a pattern should appear on the 
screen. 


(1) Display process 

Displays are produced by attaching a $ before a character variable (in 
this case AB$). This same process can also be used in a program. 

The string that is assigned to AB$ is made up of hexadecimal values (the 
hexadecimal number system uses numbers @ through 9 plus alphabetical 
characters from A through F). This same configuration can be used to 
produce a variety of user generated graphics. 


(2) Pattern configuration 

Graphics are produced using the hexadecimal pattern shown below. The 
pattern is an 8 x 8 grid, and each of the 64 positions of the grid represent 
a dot on the screen. 

As can also be noted, dots are arranged into 16 groups of 4 dots each. 
These 16 groups are numbered according to the hexadecimal system 
mentioned above. 


@O@QOOQLOO 


QQOQOOSN 
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(3) Dot designation 
Dots are specified using the hexadecimal values. The following shows 
the binary equivalents of the 16 hexadecimal values. 


@ Hexadecimal— Binary 


22-0000 4-0100 81000 
170001 5-0101 =9>1001 
270010 67-0110 A>1010 
37-0011 770111 =B>1011 


The above table shows that the hexadecimal values can be expressed as 
4-digit binary values. On the screen a binary ‘‘1”’ indicates that a dot is 
displayed, while a ‘‘0” indicates that the dot is not displayed. 

It is important to note, however, that the PB-770 counts dots from left 
to right, from @ through 3. It should also be noted that this counting 
system is the opposite that of the binary number system. 

The following table illustrates the 16 patterns possible with the 4-dot 
groups. Specifying the proper hexadecimal value will produce the 
corresponding pattern on the screen. 


Pattern i asaasillirs 


Pattern Se ai 


| (wm | «4 


| Um | © 
oi | 

ee: 
a aa 


value 
ee 
= 
el 


(4) Cautions 

The following points should be noted when defining patterns. 

1. Failing to include a ‘$”’ directly before the character variable will 
cause the string in the variable to be produced on the screen. 

2. Pattern display cannot be accomplished if the assigned string is longer 
than 16 characters, if it is shorter than 16 characters, or when the 
LPRINT command is used. 
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(5) Using character definition to display “ apy ”’ 
The following program is included to help you get some practice with 
character definition. When executed, the program displays “‘ aBy ”’. 


10 A1$="@080442A21119E68G0" 
20 AZS$="C12222A12222E320" 


38 A3$="G02241CB4GEBER4B" 
4@ PRINT $A1$; $AZ24; $A3$; 


(6) Pattern utility 

It is often difficult to convert a hand-drawn pattern to hexadecimal 
format for input to the computer. The following program makes it possi- 
ble to develop a pattern on the screen of the PB-770 itself and then auto- 
matically convert it to hexadecimal. 


First, input the utility program on pages 98 and 99 into the PB-770. 
After confirming that input was performed correctly, enter RUN @]. 

An 8 x 8 grid will appear on the left side of the screen. The blinking dot 
at the upper left position of the grid represents the pattern cursor. The 
word “ON” or “OFF” on the right of the screen indicates the status of 
the pattern cursor. ON indicates that a dot is present at the pattern 
cursor position, while OFF indicates that a dot is not present. The (-) 
key is used to switch the status of the pattern cursor. Movement of the 
pattern cursor is controlled by the following keys. 


Movement of the cursor is confirmed by a beep each time one of the 
movement keys is pressed. Try moving the pattern cursor around the grid 
and turning some dots ON and OFF. Try making a pattern of your 
choice. 
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Once a pattern is formed, press the key. Shortly, the hexadecimal 
value that represents the pattern formed above will be displayed. Write 
down this value and assign it to a registered character variable in the 
PRINT$ statement to display the original pattern that you created above. 


10 
20 
30 
4 
58 
6 
7 
82 
38 
100 
110 
120 
130 
140 


150 
160 
172 
180 


19 


200 
210 
220 
230 
240 
25G 
260 
270 


CLS 

X=2:Y=2:F=8 

FOR I=@ TO 32 STEP 4 
DRAWCI,;0)-¢€1;31) 

IF I=@ THEN 72 
DRAW(C@, 1)-¢31, 1) 


NEXT I 
LOCATE 11,;3:PRINT "OFF"; 


BEEP 

K$=INKEY$:L=ASCCKS$) : N=UAL CK $) 

IF L=12 THEN 210 

DRAWCX; YD 

DRAWC (Xs Y) 

IF F=1 THEN DRAWCX; YD): DRAWC CX-2) 74 

+100, ¢Y-2)74):GOTO 162 

DRAWC ¢ CX-2)074+100> (Y-2)74) 

IF K$="" THEN 10@ ELSE BEEP 

LOCATE 11;3 

IF L=46 THEN IF FS@ THEN F=1: PRINT 
"ON "; ELSE F=@:PRINT “OFF "; 

IF N>@ THEN IF NC1@ THEN IF N¢O5 T 

HEN GOSUB (N+4)X1@0@ 

GOTO 180 

AAS="": BEEP 

FOR K=@ TO 7? 

2= 

FOR I=@ TO 3 

IF POINTC1+1@0@;K)<¢>@ THEN 2=2+271 

NEXT I 

AAS=AAS+RIGHT$CHEX$(2)3 1) 
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280 
296 
380 


310 
322 
332 
342 
356 
360 
378 


382 
58 
512 
520 
62 
614 
78Q 
710 
72 
80g 
812 
1820 
1818 
1100 
1114 
1120 
1208 
1210 
1382 
1312 
1320 


3-20 DISPLAYING PATTERNS 


2=Q 

FOR I1=4 10 7 

IF POINTC1I+1@@;K9¢>@ THEN 2=2+27C1 
—4? 

NEXT I 

AAS=AAS+RIGHTS$CHEX$C2)> 1) 

NEXT K 

CLS *BEEP : LOCATE 1030:PRINI SAAS 
PRINT Ss" AdgsorS 


PRINT " OK?<Push any kewr>?"3$ 
K$=INKEY$: IF K$="" THEN 37@ ELSE 1 
Q 

END 

X=X-4:Y=Y+4:1F &®<G@ THEN X=32 

IF Y>3@ THEN Y=2 

RETURN 

Y=Y+4:1F Y>30@ THEN Y=2 

RETURN 


KR=Xt42YHV+4:i1F X23@8 THEN X=2 


IF Y>3@ THEN Y=2 
RETURN 

X=X-4:1F X<@ THEN X=30 
RETURN 

X=X+4:1F X>38 THEN X=2 
RETURN 


KR=X-4:Y=Y-4:1F *<O THEN xX%=30 


IF Y<@ THEN Y=32 
RETURN 

Y=Y-4:1F Y<@ THEN Y=32 
RETURN 


X=X4+4:Y=Y-4:1F X>3Q THEN X=2 
IF Y<@ THEN Y=32 
RETURN 
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3-21 PB-770 GRAPHIC FUNCTIONS 


The PB-770 has a large liquid crystal display (LCD) which displays 20 
characters x 4 lines, and also has 160 x 32 dots which allow graphic 
displays. 

PB-770 graphics can draw a precision graph and patterns using simple 
commands. 

Also, a 4 color 114 mm wide plotter-printer with cassette interface (FA- 
10 or FA-11) can be connected to the PB-770. 

Since up to 80 characters can be printed on 114 mm wide paper, this 
printer can be used in almost the same way as a full-scale plotter printer. 
The compact PB-770 is provided with sophisticated graphic functions 
that should be mastered to fully utilize its capabilities. 

Although you may feel them troublesome at first, you will soon become 
accustomed to the graphic functions with experience. 


Plotter-printer with standard cassette tape recorder and cassette interface (FA-11) 


stor 


ON HOME RECALL 


oo oe 


aieniecipe 
a2eoao 
algerie: 
geoae 
ee 
gaan 
0 mA CASIO FAST 
28 rensoutouone 
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3-22 GRAPHIC COMMANDS AND SCREEN 
COORDINATES 


Graphics are drawn on the screen by connecting a series of dots, so the 
only thing required for graphics is providing dots at the proper locations. 
The PB-770 has two commands which are used to draw and erase dots at 
specified locations on the screen. 


DRAW .... Draws dots and straight lines. 
DRAWC ... Erases dots and straight lines. 


Also, the following convenient function is provided for graphics. 
POINT .... Shows whether a dot is drawn or not at a specified location. 


It is necessary to understand dot locations (coordinates) on the screen 
before explaining the use of the above commands and function. 

The small numerals (horizontal: @ to 159, vertical: @ to 31) in the figure 
below indicate dot locations (graphic coordinates), while the large 
numerals (horizontal: @ to 19, vertical: @ to 3) indicate character coordi- 
nates. 

A character is drawn by 8 x 8 dots, and its display location has to be 
determined. 

Conversely, dots and lines can be drawn at any location using graphic 
coordinates. 

The straight line from (3, 29) to (29, 17) was drawn by a graphic com- 
mand which allows graphics to be freely drawn anywhere. 


Screen coordinates 


17 18 19 


18 140 142 144 146 148 150 162 154 156 158 159 
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Graphic coordinates consist of 5120 dots with 16@ dots in the X direc- 
tion and 32 dots in the Y direction. The top left corner of the screen is 
(Q, @), and the bottom right corner is (159, 31). 

Dot locations on the screen can be specified using these coordinates. 

For example, to draw a dot at the (X, Y) location, use 


DRAW (X, Y) 
and to erase a dot at (X, Y), use 
DRAWC (xX, Y) 


A straight line can be drawn with the same command by specifying the 
coordinates at both ends (X1, Y1) — (X2, Y2) of the line as follows. 


DRAW (X11, Y1) — (X2, Y2) 


A line that connects three dots (X1, Y1) — (X2, Y2) — (X3, Y3) can be 
drawn by specifying the following. 


DRAW (X11, Y1) — (X2, Y2) — (X3, Y3) 
Any number of lines can be drawn as a single line by linking coordinates 
with “—’’, 
A straight line can be erased by specifying the following. 


DRAWC (Xi, Y1) — (X2, Y2) 


When a dot at a specified location is lit (drawn), the POINT function 
produces 1, and when not lit @. For example, the point at (X, Y) can be 
checked as follows. 


POINT (X, Y) 


The values 1 which indicates a dot is drawn, and @ which indicates a dot 
is not drawn can be used in a program by assigning the value to a vari- 
able as follows. 


A = POINT (X, Y) 


Let’s look at programs for drawing polygons using the method for 
drawing a straight line that was previously explained. 

To draw a polygon, link the coordinates at the vertexes with the DRAW 
command. 
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# Triangle 
A program that draws a triangle with vertexes (100, 5), (85, 25), (125, 
25) is as follows. 


LO REM: === FRIANGLE >> 
26 CLS 
38 DRAW C100,5)9-(85> 25)9-€1253 25)-€180;5 


5) 
40 END 


Coordinate specification by the DRAW Triangle drawn on the screen 
command can also be performed with 
numerical expressions. (108, 5) 


For example, the program above can be 
rewritten using numerical expressions 
as follows. 


(85, 25) (125, 25) 


REM: === TRIANGLE === 
CLS 


X=100: Y=5 Dot coordinates where drawing starts. 


DRAW Cs YI-CX-155 Y+209-CX+255 Y+2Q)- 
CX YD 


END 


103 


CHAPTER 3 “BASIC’ REFERENCE 


# Rectangle 


The following program draws a rectangle with the straight line (80, 5) — 
(150, 28) as its diagonal. 


1@ REM --- RECTANGLE --- 
2@ CLS 
3@ DRAWC8@;5)-¢€150,5)-¢€158> 28)-( 88; 28 


»-(€8@; 5) 
4@ END 


# Equilateral Pentagon 


An equilateral polygon is one that is inscribed 


ae ‘ : ‘ Equilateral Pentagon 
inside a circle with each vertex having equal ? 


spacing. 

The figure on the right shows an equilateral 

pentagon inscribed inside a circle with radius R. 

The lines that connect the 5 vertexes with the -_ 
center of the circle all cross at the same angle, {A 

A (in this case A=72°). Way, 


A program for a pentagon inscribed inside a 
circle with a center (100, 18), and a radius 
15 can be drawn as follows. 


REM --- PENTAGON --- 
CES 

R=15 

X=100: Y=18 

A=360/75 


FOR I=@ TO 36@ STEP A 

DRAW CX-SINCID XR» Y-COSC I) XRI-CX-SIN 
CI+A)XRs Y-COSCI+A) XRD 

NEXT I 

END 
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= Equilateral Polygon N 
Equilateral polygon N can be freely drawn by changing angle A in the 
program for the pentagon. 
Pentagon A=360/5 
PolygonN A=360/N 
The following is a general purpose program that draws an equilateral 


polygon N after N is entered. 
The center of the circle is (100, 15). 


REM --- POLYGON 

CLS 
R=15 Radius 
X=100: Y=15 Center of circle 
INPUT "N="3N Equilateral polygon N 
A=360/N Angle of equilateral polygon N 
FOR I=@ TO 3608 STEP A 
DRAW CX-SINCI XR» Y-COSC I) XRI-CX-SIN 
CI+AD XR» Y-COSCI+AD XR) 
NEXT I 
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3-23 DRAWING A CURVE 


A curve can be drawn by specifying dot coordinates on the screen. 
The problem, however, is how to specify the coordinates. 

Many different curves can be drawn using mathematical formulas. 
Let’s draw a circle and SIN curve as follows. 


= Circle 

As the value N in the equilateral polygon program of the last section 
increases, the resulting figure comes closer to being a circle. Although, 
from a strictly geometrical point of view, a polygon can never be a circle, 
curves are actually produced on the screen by linking a series of straight 
lines. 

The following program produces a circle with a radius of 15 originating 
at coordinates (100, 15). 


REM —--- CIRCLE 

CLS 
FOR 1=@ TO 360 STEP 5 
*=100+COSCIIX15 Horizontal dot position 


on the circular arc. 


Y=15-SINCIDX15 Vertical dot position on 
DRAW C5 YD the circular arc. 
NEXT I 

END 
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3-23 DRAWING A CURVE 


= SIN Curve 

The value of the SIN(I) function changes from @ to 1 to @ to —1 to Oas 
the value of | progresses from @° to 360°. 

Therefore, a sine curve can be produced by drawing dots (that have been 
magnified to a suitable size) along a vertical axis. The following program 
draws a sine curve together with the X and Y axes. 


SEI .=—== STINE === 


CLS 
A=65:B=15 SIN curve origin (origin of the X, Y axes). 


Mt=12 Enlargement 

FOR I=@ TO 360 STEP 4 

X=A+174 X coordinate dot 
Y=B-SINCI>XM Y coordinate dot 
DRAW CX YD 

NEXT I 

DRAW CA; 2)-CAs 28) 

DRAW CA: B)-CA+92; BD 

END 


Ready PO 
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3-24 DRAWING A LINE GRAPH 


Line graphs are often used when time variations are checked, such as a 
temperature changes or price changes over a period of time. 

Therefore, it is recommended that the screen be fully utilized so that 
changes can be clearly seen. 


= Monthly Average Temperature 


It is assumed that the monthly average temperature in a certain city is 
as shown in the following table. Data is entered in the program using a 
DATA statement. Then the monthly average temperature is drawn by 
the line program while data are supplied using a READ statement. 


ae 


pr [ a [eos 
ee [a7 [ly [a8 | ne | 


Pam | 6s | | m2 | Ome | va 


10 
20 
30 
40 
50 
60 
70 
80 
30 
100 
110 
120 
130 
14 


REM --- LINE GRAPH --- 
CLS 
FOR I=1 TO 3 


PRINT 3@-(C1-1)X1@; CHR$(14?)......cHR$ (147) 
NEXT I =e 
PRINT TABC3); CHR$(154)3.....cHR$ (154) = 
FOR I=1 TO 12 

PRINT CHR$(144)3 «.--cHR$ (144) =+ 

NEXT I 

FOR I=1 TO 12 

X=36+¢(I-1)*8 

READ A 

Y=4+(30-A)kO.8 

IF I=1 THEN 168 
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3-24 DRAWING A LINE GRAPH 


150 DRAWCP;Q)-CX;s Y) 

160 P=X: Q=Y 

17@ NEXT I 

180 DATA11.5;9.8513.7;18.3:19. 8; 23.432 
6.6;28.23;22.3:;18.5;15.9314.7 

200 IF INKEY$="'""" THEN 2@0@ Prevents the screen from 

21@ END 


scrolling. 


A portion of the dot pattern is magnified as shown below to help visualize 
the locational relationship of the graph’s values, vertical axis (Y), horizon- 
tal axis (X), and lines. When you prepare a program for drawing a pattern 
or graph, it is recommended that such a picture be drawn to determine 
the locational relationship. 


Dot Pattern 


0 246 8 10 


If line 200 were omitted, a command wait occurs soon after program 
execution has terminated which causes the following display and de- 
stroys the graph. 


Ready PO 


Line 200 preserves the graph on the screen until a keys is pressed. 


109 


3-25 PREPARATION FOR DRAWING 
A BAR GRAPH 


= Drawing A Bar Graph Using Characters 


When you execute the following program and enter the numerals from 1 
to 20 to N, N number of — marks are displayed continuously. 


10 CLS 

20 INPUT "N="sN 

30 FOR I=1 TON 

40 PRINT CHR$C131)3 °°: CHR$ (131) is the =» mark. 
5@ NEXT I 

6@ END 


The length of the bar is proportional to the value of N. Since this unit is 
capable of displaying 20 characters in one line, however, it is necessary 
to scale N to keep values that exceed 20 within the limit of the screen. 
For example, to display a value of 100, the program above is modified 
as follows. 


30 FOR I=1 TO N/6 


30 FOR I=1 TO N STEP 6 


It should be noted that with this program values from 90 through 95 
would produce bars of the same length, so this technique is only capable 
of rough approximations. Graphics can be used to overcome this problem. 


= Using Graphics In A Bar Graph 

The above program can be rewritten to include graphics as follows. By 
employing graphics, a total of 160 display units are available for resolu- 
tion that is 8 times greater than the method used above. 
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3-25 PREPARATION FOR DRAWING A BAR GRAPH 


CLS 

INPUT "N="3N 

FOR I=1 TO Nx1.5 
DRAW CI-1;8)-C1I-1;14) 
NEXT I 

END 


While the bars used for this program are plain, easy-to-read graphs can be 
drawn by changing the pattern of the bars. 

Bar graphs can be drawn with the following patterns by adding or substi- 
tuting the following routines (a) to (d) in the above program. 


© © 


Nee 


@ 35 
36 


® 38 
40 


© 35 
42 
45 


@ 25 
30 
30 
36 
42 
=) 4) 


IF I=NxX1.5 THEN 4@ 
IF I MOD 2=@ THEN 5@ 


FOR 1=8 TO 14 STEP 2 
DRAW CQ, I)-CNX1.5-1,) 1) 


FOR J=8 TO 14 STEP 2 
DRAWC I-15 J+¢I+1) MOD 2) 
NEXT J 


FOR J=8 TO 14 

FOR I=1 TO Nx1i.5 STEP 3 
X=CJ-8) MOD 3+I-1 

IF X>NX1.5-1 THEN X=NX1.5-1 
DRAWC Xs JD 

NEXT I:NEXT J 


3-26 TWO EXAMPLES OF BAR GRAPH 
PROGRAMS 


Bar graphs are often used to provide representation of relative relation- 
ships among academic scores, sales, production amounts, etc. Besides 
this, the graph must be scaled to accurately show the magnitude of each 
item while keeping within the physical restrictions of the screen. 
Basically, bar graphs can be classified into two general categories. The 
first type shows the relationship among anumber of quantities by assigning 
each quantity to its own bar. (i.e. production or sales totals for individual 
products.) The second type shows the relationship of individual quan- 
tities to the whole. (i.e. production or sales totals for individual products 
compared with overall totals.) 

Now let’s prepare programs for both of these two basic types. 


Data example: Production amounts for vehicles A and B are shown in 


the following table. 


57,200 67,200 
Vehicle B 39,200 31,100 27,500 


ES; Ss~Patterrn of the bar graph for vehicle A. 
Pattern of the bar graph for vehicle B. 


= Assigning Each Item To Its Own Bar 


1@ REM --- BAR GRAPH --- 

2@ CLS 

30 FOR I=@ TO 2 

40 LOCATE @:;1 

50 PRINT 80+I1; CHR$(136) ----- CHR $ (136) = I 
6@ FOR J=1 TO 2 

7@ READ A 

80 FOR K=@ TO 2 


LIZ 


=] 7) 
100 


110 
120 
130 
140 
158 


Display Example 


3-26 TWO EXAMPLES OF BAR GRAPH PROGRAMS 


Y=1X8+CJ-1)X4+K 

IF J=2 THEN IF K=1 THEN DRAWC24+AZ 
90@;Y):GOTO 120 

DRAW C253 Y9-C€24+A/5003 YD 

NEXT K:NEXT J:NEXT I 

IF INKEY$=""" THEN 130 

END 
DATA48200; 39200; 57200; 31100;67200; 
27500 


= Comparing Individual Totals with Overall Total 


1@ REM ---—BAR GRAPH --- 


20 
30 
40 
50 
60 
7 
80 
38 
100 
110 
120 


CLS 

FOR I=@ TO 2 

LOCATE @;1 

PRINT 80+1;CHRS¢( 136) 
READ A;B 

FOR J=@ TO 6 

Y=1x8+J 

DRAW C253 Y)-€24+A/71000; Y) 
NEXT J 

X=24+A71000: Y=1X8 

DRAW CX+15 Y)-CX+B/1000;5 Y)-¢CX+B71000 
»VY+6)-CX+15 Y+6) 
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130 NEXT I 

140 IF INKEY$=""" THEN 14@ 

15@ END 

168 DATA482@@; 39200; 57200; 311800; 67200; 
27500 


Display Example 
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3-27 ANIMATION DRAWING 


When you execute the following program, the * mark moves to the left 
and right. 


1@ CLS 

20 FOR I=5 TO 15 
3@ LOCATE I:;1 

4@ PRINT " xX" 

5@ NEXT I 

60 FOR I=15 TO 5 STEP -1 

7@ LOCATE I51 Moves from right 
8@ PRINT "xX " ue 

9@ NEXT I 

180 GOTO 20 


Moves from left to right. 


As can be seen above, the control variable (1) increments from 5 to 15. 
This means that the coordinates of the LOCATE command in line 3@ are 
sequentially changed from (5,1) through (15,1). It should be noted that 
the PRINT command in line 40 is written with a space inserted in front 
of the ‘‘>”’. 

This space is essential because it “‘erases” the previously drawn “ *’’ by 
replacing it with an empty space. This sequential displaying and erasing 
along successive positions produces an illusion of movement from left to 
right. Lines 60 through 90 decrement the control variable to reverse the 
procedure and cause the ‘‘ * ” to move from right to left on the screen. 
This short program represents the basic principle of graphic animation. 
Vertical movement is performed in a similar manner, but, since the ‘‘ *”’ 
is displayed in successive lines of the screen, a statement must be added 
to return one line to erase the previous ‘‘*’’. The following program 
illustrates vertical animation. 


1@ CLS 

20 FOR I=@ TO 3 

30 LOCATE 1@,I1:PRINT "xX"; 

40 IF I=@ THEN 60 Moves from up to down. 
9@ LOCATE 1@;I1-1:PRINT " " 

60 NEXT I 
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7@ FOR I=3 TO @ STEP -1 
8@ LOCATE 1@;1:PRINT "x"; 


90 IF I=3 THEN 110 Moves from 
down to up. 
100 LOCATE 1@;I1+1:PRINT " " 
110 NEXT I 
120 GOTO 20 
= Adjusting Speed 


If the * mark moves too fast in the above program, the speed is con- 
trolled using a FOR-NEXT statement. 

Execute the program after adding the following line to the horizontal 
movement program. 


45 FOR J=1 TO 5@:NEXT J 


When this statement is used, the speed of the movement from left to 
right becomes slightly slower. The speed is increased by reducing the 
final value of the FOR-NEXT statement, and is reduced by increasing 
the value. 


# Moving A Dot Like A Curved Line 
The movement of a dot to form a curved line is accomplished using 


graphic coordinates. 
In the following program, a dot repeatedly moves along a dotted line 
enclosed within a frame. (See Execution Example.) 


1@ CLS 
20 DRAWC13;0)-€133 319-€137s 319-¢€1373 @) 


seeees Draws a frame. 


30 DRAWC143;0)-0145 30)0-€1365 30)-€136; @) 


seeees Draws a frame. 
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40 N=1:P=14 

5@ FOR I=@ TO 360 STEP 3 | | 
6Q@ X=P+N: Y=29-25xXABS(COSCI)) ++ Computation of dat coordi: 
7@ DRAWCX3 YD 

80 IF P=14 THEN 10a 

9@ DRAWC(P3Q) 

100 P=X:Q=Y 

11Q@ NEXT I 

12@ N=-N 

13@ GOTO 5a 


Execution Example 


# POINT Function 
The POINT function checks to see whether a dot is drawn or not ata 
specified location of the graphic coordinates. 
If a dot is positioned at horizontal coordinate (X) and vertical coordinate 
(Y). 

POINT (X,Y)----1 
If a dot is not at that position, 


POINT (X,Y)--::@ 


The following program provides an example of the POINT function. 
At first, “CASIO PB-770” is displayed on the first line, then the 
POINT function checks whether each dot is drawn or not, and copies 
it to the third line depending on the value of (X,Y). 


117 


CHAPTER3 “BASIC’ REFERENCE 


18 
20 
30 
40 
58 
60 
70 
88 
38 
100 


CLS 
PRINT "Xxx CASIO PB-?77@ Xxx" 
FOR X=@ TO 159 
FOR Y=@ TO 7? 
IF POINTCX:;Y)=@ THEN 7@ 
DRAW CX; Y+ 16) 
NEXT Y 
NEXT X 
IF INKEY$="" THEN 3@ 
END 


Lines 30 through 8@ confirm whether or not dots are drawn in the first 
line of the character coordinates. If dots are not present, execution 
jumps from line 5Q@ to line 7@. If dots are detected, they are reproduced 
at the same location of the character coordinates in the third line. 

A hardcopy of the display can be produced using the optional FA-10 or 
FA-11 plotter-printer. Though details on the use of printers are included 
in another section, the following program is included as reference. 


10 
20 
25 
30 
40 
co} 4) 
0D 
60 


7O 
80 
38 
100 


CES 

PRINT "CASIO PB-77@" 
LPRINT CHR$¢28); CHR$¢37) 
FOR X=@8 TO 1593 

FOR Y=@ TO 7? 

IF POINTCX, YI=@ THEN 70 
U=Xx@. 59: W=YxXO.59 

LPRINT "D"3U3"3"3—-1kW3 "59 "3;UtO.4; "5 
"3S—-1xkCWt+0. 4) 

NEXT Y 

NEXT »& 

IF INKEY$=""" THEN 9@ 
END 
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3-28 GAME APPLICATIONS 


The animation learned in the previous sections is often used for games, 
and the following program illustrates this. Though requiring no particular- 
ly difficult technique, games require routines that realistically produce 


graphic animation. 


The length of the program may make it look rather imposing, but it is 
suggested that the user try some modifications to become familiar with 
the function of each line. This is one of the best ways to add new pro- 


gramming techniques to your repertoire. 
First, input the following program. 


10 

20 

30 

40 

=) ) 
180 
110 
120 
130 
140 
200 
210 
220 
380 
310 
320 
330 
340 
350 


360 
370 


REM ---BLOCK DESTROY--- 
CLS 

FOR I=0 TO 3 

LOCATE 2,1: PRINT CHR$¢(137); 
NEXT I 

FOR I=3 TO 6 

FOR J=0 TO 3 

LOCATE I;J 

PRINT CHR$¢C141)3 

NEXT J:NEXT I 

LOCATE 1731 

PRINT CHRS$¢(147) 

R=1:S=0 

FOR N=3 TO 1 STEP -1 

LOCATE @;@:PRINT N 

X=10: Y=INTCRNDX2+1):A=1: B=1 
LOCATE X;Y:PRINT CHR$(236); 
Q$=INKEYS$ 


IF Q@$="1" THEN GOSUB 5@@ ELSE IF @ 


$="@" THEN GOSUB 6280 
IF X=3 THEN A=-A 


IF Y=@ THEN B=-B ELSE IF Y=3 THEN 


B=-B 


aD e, 
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380 
33@ 
400 
410 
420 
430 
440 
450 


460 
470 
480 
430 
988 
510 
520 
530 
342 
620 
610 
620 
630 
702 
71@ 
720 
73@ 


740 
800 


IF X=16 THEN GOSUB 8@@ 
LOCATE X;Y:PRINT " "5 
IF X>16 THEN 440 
G=CX+tA) 8: H=CY+B)X8 
P=POINTCGs;H) 

IF P=1 THEN GOSUB 780 


X=X+A; Y=Y+B 

IF X>18 THEN BEEP :BEEP :BEEP' ELS 
E 330 
NEXT N 

CLS :LOCATE 2;1:PRINT "SCORE ";S 
FOR I=1 TO 6:BEEP 1:NEXT I 


IF INKEY$=""" THEN 49@ ELSE END 
LOCATE 173;R:PRINT " "3; 

R=R-1 

IF R<@ THEN R=@ 

LOCATE 17;R: PRINT CHR$¢(147); 
RETURN 

LOCATE 17;R:PRINT " "3; 

R=R+1:IF R>3 THEN R=3 

LOCATE 17;R:PRINT CHR$C147); 
RETURN 

S=S+8-X: BEEP 1 

LOCATE X+A;Y+B: PRINT " "5; 

x=Xt+A: Y=Y+B: A=-A 

IF Y=@ THEN B=-B ELSE IF Y=3 THEN 
B=-B 

RETURN 

IF Y=R THEN A=-A: BEEP ELSE IF Y+tB 
=R THEN BEEP :A=-A ELSE 830 
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810 IF RND<@.7 THEN 830 
820 LOCATE X»Y:PRINT “ "3: x%=X-1 
838 RETURN 


Line 420 uses a POINT function to check whether or not a dot is present 
at a certain location of a block. It does this by checking only the coordi- 
nate of the top left corner as shown below. 


POINT (G, H) POINT (G, H) 
= = 4] 
A block drawn with A block erased with 
CHR$ (141). CHR$ (32). 
= How To Play 


When this program is executed, blocks are drawn on the left and a racket 
is drawn on the right. A ball moves across the screen and the player must 
move the racket into place to keep the ball in play. Pressing the (1) key 
raises the racket and pressing the key lowers the racket. If the player 
misses the ball with the racket, a miss is registered and the next ball is 
served. Missing three times ends the game. The final score is displayed at 
the end of the game. 


= Variable Table Of Block Destroying Program 


A,B Ball direction 
G,H Coordinates for checking whether a block is drawn or not 
|,) Variables for drawing blocks and fence 
N Number of remaining balls 
P Check whether a block is drawn or not 
Q$ Racket direction 
R Racket position 
S Score 
X,Y Ball position 
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3-29 DRAWING A PATTERN WITH THE 
PLOTTER-PRINTER 


Hardcopy can be produced with the connection of the optional FA-10 or 
FA-11 plotter-printer with cassette interface. Though a plotter-printer 
can be used for printing of text, it is especially suited for graphics. Both 
types of output are produced by drawing a number of dots in series to 
form the final figure. 

This is similar to the method used for the production of figures on the 
screen, but the mechanical operation of the printer necessitates special 
commands to increase speed. 

Though there are large number of plotter commands, their use makes 
operation much faster and contributes much to making programming 
easier. 


= Commands 


All commands for making graphics with the plotter-printer start with 
LPRINT. Many functions can be performed when the commands shown in 
the command table are used together with LPRINT. 


However, it is necessary to specify the graphic mode with the following 
statement before using these commands. 


Graphic mode specification: LPRINT CHR$(28); CHR$(37) 


The following statement is used to cancel the graphic mode (i.e., to 
specify the character mode). 


Character mode specification: LPRINT CHR$(28); CHR$(46) 
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Plotter Command Table 


[ener 
A 
C 
X 
G 
L 
S 


[| -o] ORIGIN Origin specification of ORG coordinates 
PD DRAW Links a dot with a dot specified by ORG 
coordinates. 

i a eek Draws a line up to a specified dot. 
Moves to position indicated by ORG 
pom MOVE coordinates without plotting. 
RELATIVE |Moves to specified position without 
MOVE plotting. 
Draws a parallelogram on X and Y axes 
QUAD with the diagonal of 2 dots indicated by 
ORG coordinates. 
Draws a circle and circular arc with a dot 
CIRCLE specified by ORG coordinates as the 
center. 
Draws a coordinate axis from the origin 
AXIS of ORG coordinates in direction of +Y, 
+X, —Y, and —X. 
GRID Draws horizontal or vertical stripes in a 
specified square. 
LINE Draws a solid line, broken line, one-dot 
TYPE chained line, or two-dot chained line. 
LINE Specifies the pitch of a broken line, one- 
SCALE ie chained line, or a two-dot chained 
ALPHA Specifies the size of characters and sym- 
SCALE bols. 
ALPHA Specifies the rotary direction of charac- 
ROTATE ters and symbols. 
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as 
Specifies character spacing for a following 
digit and line. 


Specifies horizontal or vertical writing. 


Draws a mark with a pen position as its 


LINE FEED ela feed and paper return by one line 
HOME Modifies absolute coordinates, or shifts 
Control the pattern to a location that is easy to see. 


Checks pen use and pen ink. 
Execution Example: 

CHR$(64) | TEST LPRINT CHR$(28) ; CHR$(37); 
CHR$(64) @] 


pT [tap | Tabutator 
Character 
control FORMAT Program list output 
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Now let’s produce a simple pattern using the plotter-printer. The follow- 
ing program connects the points at (0,0), (70,—30) and (90,10) with two 
straight lines. Therefore, the D command should be used. 


1@ LPRINT CHR$(28); CHR$C37> 
2@ LPRINT "D"3@3"3"303"3"370; "3 "3-30; 


"3"590;"5"510 


| 
(90,10) (8,0) (70,—30) 


Execution Example 


The same technique can be used to connect any number of points 
desired (as long as one programming line stays within the maximum of 
79 characters). 


The next program produces a circle graph. The C command is usually 
used to produce a circle with the plotter-printer, but lines must also be 
included to divide the circle to reflect the size of various data. 
This particular program will use the data 100, 200, 300, 40@ and 50Q as 
the data. 

1@ LPRINT CHRS$¢C28); CHRS$C37) 

20 LPRINT "C48;-50,30" 

30 S=@0:T=0 

40 FOR I=1 TO 5:READ A: T=T+A: NEXT I:R 

ESTORE :A=0 
58 FOR I=1 TO 5:A1=A 
68 READ A:S=S+A 
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7Q X=48+ INTC 3Q@XSINC360XS/T) >: Y=-SO+IN 
TC 30@XCOS¢C360xS/T)>) 
8@ LPRINT "“D48;3;—-5S0;"sxX%i "3s "sy 
30 AZ=CA1+tAI72: GOSUB 200:NEXT I 
35 END 
100 DATA1@@; 200; 300; 400; 508 
200 X=50+INTC2OXSINC360XS/7CT+A2) 99: Y=- 
48+INTC20xCOSC360XS7CT+A2) 9) 
210 LPRINT "MN"; X-10;3"3"3¥ 
220 BS=STRS$CAD 
230 LPRINT "P";B$ 
248 RETURN Execution Example 


Line 4@ contains a READ command that reads the data in line 100. 
Lines 6@ and 70 compute locations X and Y on the circumference of the 


circle for all the data. Then line 80 connects each point (X, Y) with the 
center of the circle. 
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Though the PB-770 has more functions than the CASIO PB-700, pro- 
grams written for the PB-700 can be used with the PB-770 without 
modification. 


It should be noted, however, that compatibility is only upward, and 
certain programs written for the PB-770 cannot be executed with the 
PB-700 without modification. Programs for the PB-770 must be rewritten 
using only commands that can be executed with the PB-700. 

Programs or data stored on cassette tape from the PB-700 can also be 
used with the PB-770 without modification, but programs or data files 
(DF) stored on cassette tape from the PB-770 cannot be read with the 
PB-700, 

The difference between the PB-770 and PB-700 is as follows. 


@ Additional command 
POKE 
@ Additional functions 


DEG, HYPSIN, HYPCOS, HYPTAN, HYPASN, HYPACS, 
HYPATN, PEEK, DMS$, HEX$, &H 


® Modified commands 
PRINT, CLEAR 
® Modified function 


CHR$ 


CAUTION: When using programs written for the PB-700, if DATA state- 
ments are included in lines 2200 through 2299 or in lines 
with 22 in the last two digits of the line numbers (e.g. 22, 
122, 622), change the line numbers. (See page 208.) 
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Preface to Chapter 4 


The following terms are used in the “Format” section of each com- 
mand or function described in Chapter 4. 


@ “Numerical expression” 
Numerical values, variables and computation expressions. Numerical compu- 
tations are performed according to the precedence of the operators. 


“Character expression” 

Character constants, character variables and character strings. 

Character strings can be concatenated using the symbol ‘‘+’’. That is, addition 
of character strings makes a character expression. 

(Example) “ABC’ + “DE + “F” = “ABCDEF” 

Note that the number of characters of a character expression concatenated by 

+ should be 79 or less. 


“Variable” 

Variables are used to store data. Since there are two types of data (numerical 
values and characters or symbols), there are numerical variables (such as A or 
B) and character variables (such as A$ or B$). Refer to Chapter 3 for details. 
“Variable name” 

A variable is an uppercase letter (A to Z) or it can be followed by $, number, 
or uppercase letter. 

(Example) A, A$, AB, Al, XY$, X1$... etc. 

“Variable name” means this format of variable. 


“Conditional expression” 
A relational expression which compares the left side value and right side value 


using relational operators (such as =, =<, >, <>, etc.) 


“Line number” 

A number which is attached to the first position of each program line. Num- 
bers 1 to 9999 can be used. 

“Comment 

Comments are written at appropriate parts of a program in order to explain 
program contents. 

They do not affect the program execution at all. 

*““Message’’ 

Messages are displayed on the screen in order to let you perform proper 
in-put or to make the output easy to understand. They are used by 
enclosing them with ‘“‘—”’. 

‘File name” 

A file name identifies programs or data transferred between cassette tape and 
the computer. 
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4-1 MANUAL COMMANDS 
AUTO 


Function Automatically numbers program lines. 


AUTO [first line number] [,increment] 


1< first line number < 9999) 
1 < increment < 9999) 


The AUTO command greatly facilitates programming by generating 
sequential line numbers at preset increments. 


With each press of the @] key, line numbers are continuously generated 
from the line number specified by the first argument and incremented by 
the step specified by the second argument. The default value for both 
the first line number and the increment is 10. This command cannot be 
executed with a password being specified. 

This command can be released by the following operations. 


5 Pressing the @) key without input after the line number is displayed. 

2) Pressing the @a or (is) key. 

i Attempting to exceed line number 9999, 

4) When an automatically generated line number equals an existing line 
numb (@ displayed after the lin number). 


AUTO 100 


The above input causes sequential generation of line numbers from line 
10@ at increments of 10 (i.e. 100, 110, 120, etc.). 


AUTO 50, 50 


The above input causes sequential generation of line numbers from line 
50 at increments of 50 (i.e. 50, 100, 150, etc.). 
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To restart the execution of a program that was 
suspended by a STOP statement or key entry. 


The CONT command is used to restart program execution stopped by 
the STOP command in a program or by operating the key. Program 
execution restarts from the statement following the STOP command. 
Once program execution is suspended, numerical variables can be checked 
or changed before restarting, making this command a valuable debugging 
tool. 


Insert the STOP command between sections during program preparation 
to provide easy debugging. 
The following program was prepared as an example. 

1Q@ READ R>H 

20 S=PIXR“2 

3@ STOP 

4@ U=SxXH 

5@ PRINT R>H3;S3VU 

6@ DATA 10520 

7@ END 
When you execute this program with the RUN command, program 
execution is suspended at line 30 by the STOP command. 


Check the execution content of line 10 and line 20. To display the values 
of the variables, press R (Enter), H and S (Ener). Then 10, 20 and 
314.1592654 appear which proves that execution has been performed 
correctly. 

After checking has been completed, resume program execution using the 
CONT command. 


CONT @] 
Gay STOP 
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DELETE 
[Function | Provides partial program deletion by fine units. 


DELETE In 
DELETE /n— 


Formats DELETE —lm 
DELETE /n—lm 
In: First line to be deleted. Jm: Last line to be deleted. 
(13 Sim $9999) 


This command is used to delete a specific line in a program or lines ina 
specified range. 
When DELETE is used, it has the following basic formats. 


1 DELETE line number...... Deletes a specified line. 
(2) DELETE line number — .... Deletes lines from a specified line to 
the last line of a program. 
(3) DELETE — line number ... Deletes all lines up to a specified line. 
(4) DELETE line number n 
—linenumberm ......... Deletes the lines from line number 


n to line number m. 
In and Im have the following restriction. 
1</In Slm S 9999 


This command cannot be used in a program. 


A detailed explanation is provided using the following program. 


1Q REM DELETE SAMPLE 
20 PRINT "20:A" 
38 PRINT "30:B" 
40 PRINT "4@:C" 
5@ PRINT "50:0" 
(1) DELETE line number @] 


For example, when line 30 in the above program is to be deleted, enter 
the following. 


DELETE 30 @] 
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Also, the same deletion can be performed by the following operation. 
30 @) 


[2) DELETE line number — @] (Use the &) key to enter a “’“—”’.) 
When the lines from line 30 to the last line are to be deleted in the above 


program, enter the following. 
DELETE 30 © &) 
Also, line 30 and after are deleted by: 


DELETE 252) &) 


If there is no line 25, line 30, which is closest to that number, and all of 
the following lines are deleted. 


DELETE — line number ©] 


This command deletes the lines from the beginning of the program toa 
specified line number. As an example, enter the following. 


DELETE © 40 @) 


Check the listing with ~@] , to determine that lines 10—40 were 
deleted. The same result can be realized by entering the following. 


DELETE © 47 @) 
Again, though there is no line 47, the lines from the beginning of the 
program to the nearest line inside of 47 are deleted. 
[4] DELETE line number n—line number m @] 
To delete the lines from line 20 to line 40 from the previous program, 
enter the following. 


DELETE 20 &)40 @]) 


= Attempting to use the DELETE command in a program protected by 
the PASS command will result in a PR error. 

@ Including a fractional part in the line number will result in an SN error. 

= If n is greater than m in item (4) above, or if a specified line number 
does not exist, nothing will be deleted. 


Gay” NEW, NEWALL, PASS 
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EDIT 


Function Allows a program to be modified. 


EDIT 
EDIT In (1S in S$ 9999) 


The EDIT command is used to edit a program for deletions, additions, 
corrections, etc. 

The first line of a program is displayed by EDIT 2) , and the cursor 
appears at the end. Move this cursor to the position where a correction 
is to be made with GB), : or , and perform correc- 
tions with or ot 


@ Using The Edit Keys 

Chl) 41S)! ween dace Moves the cursor to the right and left. Holding 
down either key will move the cursor in the re- 
spective direction until the end (beginning) of the 
line is reached. 


(2) A eS ...... The cursor can be moved up and down by press- 
SMT ing the key and the Cursor key at the same 
time. 
(3) (i, sdveesias If the key isheld down, characters are continuous- 
ly deleted until the key is released. 
(4) oH .. If the key are held down, spaces are continuously 


generated until the keys are released. 


Now let’s edit a program by inputting the following program. 


1@ PRINT "AVERAGE" 
20> -tNPOT As. Ba G 

30 H=CAt+B+CO)73 

4@ PRINT HA 

50, S071! 18 
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[1] Checking A Program List From The Beginning 


To display a program from the beginning and correct 1 line at a time, the 
following is used. 


EDIT @] 


Next, each time the @] key is pressed, the next line will be displayed. 


Checking A Program List From The End (IN REVERSE) 


To display line 10 of a program after the program has been listed from 
the beginning to line 50, perform the following operation. 


Program list displayed INPUT A, B, Cc 

up to line 5Q. H= (A+B+t+C) “3 
PRINT H 
GOTO 10— 

Operate [a] four PRINT H 

times until Tine 10 is H= (A+B+C) “3 

displayed as shown on INPUT A. B.C 

the right. ee 


PRINT “AVERAGE _ 


[3] Checking A Program From A Middle Line Number 


To check a line number in the middle of a program, perform the follow- 
ing operation. 


EDIT line number @] 


After this, the subsequent lines are displayed every time the @] key is 
pressed. 
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4] Using ©, 8, 
Line 20 and line 30 in the program are corrected as follows. 
20 INPUT A,B,C,D 


30 H=(A+B+C+D)/4 
When you use EDIT @) to list line 20, the display is as follows. 
Ready PO 


on e&202) EDIT 2@e 
2Q@ INPUT A, B, CH 


In line 20, after entering “ ,”’ and then “‘D’’, the correction is completed 
by pressing the @] key and line 30 will be displayed. 


Ready Pe 
EDIT 20 
Ow &) 20 INPUT A,B.C,D 
3Q H= (A+B+C)/3_ 


To insert ‘+D” in line 30, provide space for two characters with: 


—— 


a 


Pressed together 
and press FOG &! 


@ If the EDIT command is used for a program with a password, a PR 
error will occur. 
@ Edit Mode Release 
The Edit Mode is released as follows. 
(1) When the key is pressed. 
(2) When the key is pressed. 
(3) When incorrect operation is performed. 
(4) When there is no program to be displayed. 
(5) When the power is turned off. 
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LIST/LLST 


LIST: Displays the contents of a program. 
LLIST: Prints out the contents of a program. 


LIST LLIST 

LIST LLIST ALL 

LIST LLIST V 
Formats LIST LLIST In 

LIST LLIST In— 

LIST LLIST —in 

LIST(LLIST In—Im 


In, Im : line numbers 


(1 In Slm 9999) 


The LIST and LLIST commands are used to view programs stored in the 
PB-770. LIST produces the program on the display while LLIST prints 
out the program on roll paper. 

Not only programs, but registered variables can be listed. 


LIST and LLIST commands are utilized as follows. 


LIST (LLIST) @] 


This command sequentially displays (prints) all of the lines of a program 
in the current program area beginning from the first line. 


LIST (LLIST) ALL @] 

The PB-770 has a total of 10 program areas from PO through P9, each of 
which can be used for input of independent programs. This command is 
used to display (print) all programs in all of. the program areas. 


LIST (LLIST) V@] 
This command is used to display (print) all of the presently used register- 


ed variables. Besides registered variables, the array names for arrays 
declared using the DIM command can also be displayed (printed). 


LIST (LLIST) line number @] 

When a line number is specified after LIST (LLIST), that line of the 
program in the present program area will be displayed (printed). To 
display line 30 of a program located in program area P5, for example, 
perform the following key operation: 


PROG 5 @] LIsT 30 @) 
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LIST (LLIST) line number — @) (Use the (=) key to enter a “‘“—’’.) 
When the line number is followed by a ‘‘—’’, the program in the present 
program area will be displayed (printed) from the specified line number 
to the end. The following key operation will display the program in the 
present program area from line 70 to the end. 


List70 © &) 


[6] LIST (LLIST) — line number @] 

When the line number is preceded by a ‘‘—’’, the program in the present 
program area will be displayed (printed) from the beginning to the speci- 
fied line number. The following key operation will display the program 
in the present program area from the beginning to line 100. 


LIST © 100 @) 


LIST (LLIST) line number x — line number m @} 

In this case, the program is displayed (printed) from line number n to 
line number m. Since the program is displayed from the smaller line 
number to the higher line number, m must be less than or equal to m. 
The following key operation will display from line 50 to line 70 of the 
program in the present program area. 


LIST 50 © 70 &) 


[1] Suspending LIST, LIST ALL Execution 


Because the lines of a program are displayed continuously when a 
program is listed with the LIST command, it is difficult to confirm 
the program content. To overcome this, press the @] key to momentari- 
ly stop the display. To resume the program listing, press the key 
again. 

LIST command execution cannot be stopped with : 

When a program listing check is not required, press the key to cancel 
LIST or LIST ALL command execution. 


Leaving LLIST, LLIST ALL 


When a program list is being printed out with the LLIST or LLIST ALL 
commands, temporary suspension cannot be performed with the J] key. 
You can only cancel LLIST command execution by pressing the key. 
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LOAD 


Pane Loads a program or data stored on a cassette tape into the 
Bnenon main frame memory. 


LOAD 


LOAD ALL 
Formats LOAD, A 

LOAD, M 

LOAD, D, address 


The LOAD command is used to read back into the PB-770 a program or 
data that was stored on a cassette tape by a SAVE command. The file 
name that was used during SAVE is now useful. Enter the file name 
together with the LOAD command, then the PB-770 automatically 
searches for the file name and reads the program from the tape. 

If a file name is not specified, the first program or data found is read in. 


Explanation 


The LOAD command has the following formats. 


(1) LOAD 
Reads the first program found among those stored by SAVE or 
SAVE “file name” into the presently specified program area. 
There is no problem even if the program area during “SAVE” and 
the presently specified program area are different. 


(2) LOAD “file name” 
Reads the program that was stored with the same file name into the 
presently specified program area. In this case, the program area 
during “SAVE” and the program area during “LOAD” can be 
different. 


(3) LOAD ALL 
Reads programs that were stored by SAVE ALL to the same program 
areas from which they were stored. Since there is no file name, the 
programs found first among those stored by SAVE ALL are read in. 


(4) LOAD ALL “‘file name” 
Reads the programs into the PB-770 with the same file name among 
those stored by SAVE ALL “file name’”’. 
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(5) LOAD, A/LOAD “file name”, A 
Reads a program into the PB-770 that was stored in ASCII code 
(SAVE, A or SAVE “‘file name’”’, A). If there is no file name, the first 
program found is read in, and if there is a file name, the program 
with the same file name is read in. 


(6) LOAD, M/LOAD “‘file name”, M 
Reads a program that was stored by SAVE, A or SAVE ‘‘file name’’, 
A. The difference between this format and LOAD A, LOAD “‘file 
name”’,A is that reading a program in this format will not erase a 
program already in the computer, provided that the line numbers 
of the existing program are different from those of the program 
bce List C 
™ Content of P@ 
; Reads List B into PO by LOAD, A. read in by LOAD, A. 
= Program stored List B 10@ D=C/2 


in PQ. 


m™Program stored 
by SAVE, A. 


110 PRINT D 
120 GOTO 10 


10 INPUT A, B 


100 D=C/2 
110 PRINT D 
120 GOTO 10 


20 C=A+B 
3@ PRINT C 
48 GOTO 100 


List D 


# Content of PQ 
read in by LOAD, M. 


Reads List B into PO by LOAD, M. 
INPUT A, 
C=A+B 


PRINT C 
GOTO 100 
D=C/2 

PRINT D 
GOTO 10 
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(7) LOAD, D, address 
Reads data that was stored in internal code (SAVE,D,address 1 ,address 
2 or SAVE “‘file name’’,D ,address 1 ,address 2). Addresses are restricted 
to the range of —32769 < address < 65536. See CLEAR for details 
concerning addresses. 


[1] SAVE and LOAD formats must match. 

The format of the LOAD command must correspond to that used for the 
SAVE command. Similarly, a program stored with SAVE ALL must be 
read with LOAD ALL. The following table shows the relationship be- 
tween the LOAD command and SAVE command. 


LOAD,M LOAD 
"file name", 
D,address 


xX 


SAVE 
EES EE 
SAVE,D,address 1, 

address 2 Xx x Xx A A 

SAVE"file name",D, 


[2] Password 

If a program with a password is stored, the password is also stored. A 

reference for when programs with a password attached are loaded is as 

follows. 

(1) LOAD can be performed at any time there is no password stored in 
the PB-770. In this case, a stored password exists as a PB-770 pass- 
word. 

(2) When a password exists in the PB-770, LOAD can only be performed 
when the program being loaded has the same password. If the pass- 
words are different, a PR error will be generated. 
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Error during LOAD 

(1) RW error 
This error occurs when a parity error is generated during LOAD. In 
this case, clear the program which has been loaded by entering NEW 

, and perform loading from the beginning. 

(2) OM error 
This error occurs when the memory capacity is insufficient. In this 
case, clear unnecessary programs, make the first address of the data 
area larger, or expand RAM capacity. 


Gay = SAVE,, VERIFY, CHAIN, PUT, GET, PASS 
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NEW/NEW ALL 
ein [Powe 


NEW 
NEW ALL 


When new program input is performed, it is necessary to erase the pre- 
vious program. The commands that erase the previous program are the 
NEW/NEW ALL commands. 


[1] NEW Command Functions 


The NEW command erases a program in a specified program area with 
the PROG command used to specify the program area. An attempt to 
use the NEW command to erase a program protected by a passward (see 
page 144, PASS) will result in a PR error. 

Also, variables cannot be cleared (see page 158, CLEAR). 


NEW ALL Command Functions 


The NEW ALL command erases the programs in all of the program areas 
at one time. Since this command is effective when the PASS command 
has ie executed, careful confirmation should be performed when 
it is used. 

Not only programs, but all variables are cleared, the program area is set 
to P@, ANGLE is set to @ (DEG), and the data area is released (see 
CLEAR). 


The operation is as follows. 


NEW @] or NEWALL @] 
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|Function Protects a program by assigning a password. 


Format PASS “password” 


Often a program that was prepared with great effort is erased by mistake, 
or is destroyed by writing another program on top of it. 

Therefore, important programs are protected with this command to pre- 
vent program corrections and erasures from being performed. 


[1] PASS Command 
The PASS command is utilized by entering: 


PASS ‘‘Password with up to 8 characters” a) 


When this command is used, program corrections and erasures cannot 
be performed unless the password is cancelled. (This command cannot 
be used in a program.) The following commands cannot be executed. 


(1) AUTO 

(2) DELETE 

(3) EDIT 

(4) LIST, LLIST 
(5) NEW 


Also, a program can not be newly written. The functions of the PASS 
command are effective in all of the program areas. Conversely, the PASS 
command cannot be assigned to only a single program area. An attempt 
to execute any of the above listed commands when the PASS command 
has been used will result in a PR error being displayed. 
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[2] PASS Command Release 


Characters, numerals and symbols can be used for a password with up 
to 8 characters. To release a password, make an entry using exactly the 
same password as follows. 


PASS “Password with up to 8 characters’’ ca] 


Therefore, if a password is entered and forgotten, the PASS command 
function can never be released. Since a password cannot be observed, it 
is recommended that something which cannot be forgotten, such as your 
name, be used for a password. Also, before password entry is performed, 
it is important to confirm that it is correct. If passwords are forgotten, 
the only solution is to execute the NEW ALL command. 

However, since the programs in all the program areas will disappear, they 
should first be stored on a cassette tape using the SAVE command. 


Gig” SAVE, LOAD, NEW 
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PROG 
Femi | Sepopamams 


PROG numerical value (or numerical expression) 
O < numerical value (numerical expression) < 10 


The PB-770 is provided with 10 program areas (PO—P9) where indepen- 
dent programs can be written. 
The PROG command is used to specify a program area. 


When the power of the PB-770 is turned on, the display will be as follows. 


Power ON Ready PO 


When the power is turned on, the program area PQ is automatically 
specified as shown above. Next, let’s specify P9 as the next program 
area. 


Power ON 
GaP Co) =] 


Though a numerical expression can be entered after PROG, a computa- 
tion result (X) within the range of 0 < X < 10 can also be used. 
If it is outside this range, a BS error is displayed. 


Examples PROG (100/20) ~ Specifies P5 with PROGS. 
PROG (100/10) — Displays a BS error. 
PROG (100/15) — Specifies P6 (The fractional part is 
discarded.) 


Gay” GOTO, GOSUB 
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RUN 


RUN 
RUN In (1 Sn S 9999) 


The RUN command is used to execute a program in the presently 
specified program area. 


The RUN command has the following two formats. 


(1) RUN @] 
Starts program execution from the first line of the specified program 
area. Execution is performed in a sequence with the smallest line 
number first. 


(2) RUN line number @) 
Starts execution from the line number after RUN. If the specified 
line number does not exist, execution starts from the nearest line 
number larger than the specified line number. 


Execution can be started from the beginning of any program in a pro- 
gram area without using the RUN command as follows. 


Programs PO—P9 can be executed by pressing the key and any key 
from (@) ~ (gjat the same time. 
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| Function Stores a program on cassette tape. 


SAVE 
SAVE ALL 
SAVE, A 


SAVE,D, address 1, address 2 

SAVE ‘‘file name” 

SAVE ALL “file name”’ 

SAVE ‘‘file name’’,A 

SAVE ‘‘file name’’,D, address 1, address 2 


The SAVE command is used when a program is stored on cassette 
tape. 
This command has the following formats. 


(1) SAVE uso aaabace Stores in binary code format a program from a 
presently specified program area. 

(2) SAVE ALL..... Stores in binary code format the programs of all 
program areas. 

(3) SAVE,A ....... Stores in ASCII code format a program in a 


presently specified program area. 

(4) SAVE, D, address 1, address 2 
Stores in binary code format the contents from 
address 1 to address 2 of the memory. The range 
of the addresses is —32769 < address 1 < address 
2< 65536. See CLEAR for information on 
addresses. 


@ SAVE in ASCII code format requires more time and uses more tape 
than SAVE in binary code format (internal code format). 
However, it is necessary to use SAVE in ASCII code format to exe- 
cute LOAD, M (see LOAD command). 
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Assigning file names to each program stored on cassette tape makes pro- 
gram handling easier. 


[1] File Names 


SAVE “file name” 

SAVE ALL “file name” 

SAVE “file name”, A 

SAVE “file name’’, D, address 1, address 2 


e Although any character or symbol can be used as a file name, 8 
characters or less must be used. 

e For a program with a password, the actual password is also output as 
data. 


Recording Tape Counter Reading 

When you press the @] key with the cassette tape recorder in the 
record mode, recording starts. The automatic remote function stops the 
tape when it has terminated. Make a record of the tape counter reading 
for recording start and end. 


Confirmation 


Confirm if cassette tape recording was correctly performed using the 
VERIFY command (see page 153, VERIFY). If it is not correctly re- 
corded, perform the SAVE operation again. 
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File Attributes 


The file attribute names of programs or data which have been 
stored by SAVE or PUT are displayed when they are loaded to the 
computer by LOAD or GET. 


Operation for output Display during loading 


SAVE 

SAVE ALL 

SAVE,A 

SAVE, D, address 1, address 2 


SAVE “ABC” 

SAVE ALL “ABC” 

SAVE “ABC”, A 

SAVE ‘‘ABC”’, D, address 1, address 2 


The file names are displayed as they are. 
Meanings of the file attributes are as follows. 


Display during loading 
PB-77@ PF B 
Filename (A)(B) (C) 
(A) P.: Program 


A: All programs 
D: Data 


(B) File 


(C) B: Binary (Internal code format) 
A: ASCII (ASCII code format) 
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SYSTEM 


Displays program area status, specified angle unit, 
memory capacity, number of remaining usable bytes, 


and data area first address. 


[Fema [STEN 


First, input SYSTEM @] , and a display similar to that shown below 
will appear. The actual display will differ somewhat if a RAM expan- 
sion pack is used, if programs are stored in the computer, or depending 
on how much data area is available. 

Enter SYSTEM @] . If there is no program and data is stored in the PB- 
770, the following is displayed. 


P 0123456789 ANGLE 90 
8KB 68718 


Ready PO 


The following points should be noted concerning each part of the 
display. 


(1) The P 0123456789 in line 1 indicates whether or not programs are 
stored in program areas PO through P9. The program area number 
will be marked with a when it contains a program. 

(2) The ANGLE @ in line 1 indicates the specified angle unit mode. 
ANGLE @ (DEG) is always specified directly after the unit is turned 
ON. (ANGLE 1 = RAD, ANGLE 2 = GRAD) 

(3) The 8KB in line 2 indicates the memory capacity. This value will be 
ee RAM expansion packs (OR-8) are used. 


Quantity Memory capacity 
OR-8 None 8KB 
OR-8 1 16KB 
OR-8 2 24KB 
OR-8 3 32KB 


(4) The 6871B in line 2 indicates the number of remaining usable bytes. 
This value will be different when RAM expansion packs (OR-8) are 
used and when the specified address of the data area is changed. 
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(5) When a data area is specified, the first address of the data area is dis- 
played after the number of remaining bytes in line 2. This value also 
changes according to the specified address of the data area. When 
a data area is not specified, nothing is displayed. 

(6) The Ready P@ in line 3 indicates that input is possible to program 
area PQ. PO is always specified when the unit is turned ON. 


Gay ANGLE, CLEAR 
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Performs a parity check of programs or data stored on 
a cassette tape. 


VERIFY 
VERIFY ‘“‘file name”’ 


The VERIFY command checks if programs or data stored on a cassette 
tape by the SAVE or PUT command are correctly stored. 
= This command has the following formats. 
(1) VERIFY 
Checks the first program found on cassette tape. 
(2) VERIFY “file name” 
Checks the program with the same file name on cassette tape. 


# You can check all programs stored by the 8 formats of SAVE 
command (see SAVE) by using VERIFY @] or VERIFY “‘file name” 
J] . In other words, it is not necessary to specify a format of SAVE 
command. 

@ If SAVE was not correctly performed, an RW error is displayed. If this 
occurs, store the programs again. 


The actual procedure is as follows. 

Step 1: Tape Rewind — Return the tape on which programs are stored 
by the SAVE command to the initial location by using the 
tape counter. 

Step 2: VERIFY Command Input — If the program has a file name, 
enter VERIFY “file name” @] , and if it has no file name, 
enter VERIFY @). 

Step 3: Press the PLAY button of the cassette tape recorder. When 
check starts, either PF B, AF B, PF A, DF B or DF A (see page 
15@) is displayed. If a program or data was correctly stored, 
Ready PO—P9 is displayed and the cassette tape stops. If the 
program or data was not correctly stored, an RWerror is display- 
ed and the cassette tape stops. 
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| Function — Specifies the angle unit. 


ANGLE numerical expression 
(O@Snumerical expression < 3) 
The angle unit is usually expressed as 30° and 60° and called DEGREE. 


However, RADIAN and GRAD are also used in mathematics. The PB-770 
can handle any of these units. 


The ANGLE command is used to specify the following three angle units. 


(1) DEGREE..... (Example) 45°, 90° Input range of x: 
—5400° < x < 5400° 

(2) RADIAN ..... (Example) 0.57, 27 Input range of x: 
—30n< x < 307 

(3) GRAD........ (Example) 300, 1000 Input range of x: 


—6000 < x < 6000 
The relationship between these angle units is as follows. 


360 DEG (= 360°) = 27 RAD = 400 GRAD 
The angle unit is specified by the ANGLE command as follows. 


ANGLE 0 — Specifies DEGREE 
ANGLE 1 — Specifies RADIAN 
ANGLE 2 — SpecifiesGRAD 


The unit is always set to ANGLE ® (DEGREE) when the power is turned 
on. 


SAMPLE PROGRAM 
1@ REM xxkxk ANGLE Xxx Le cpio 
‘ 3 the vaiue o Y 
20 ANGLE @:PRINT SIN3Q; sina 3 annie Units. 
30 ANGLE 1: PRINT SINCPI/46)3 All the results are 0.5. 
4Q@ ANGLE 2:PRINT SINC10073) 
5@ END 
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BEEP 
fain [Gowen 


BEEP command is provided in the PB-770 to generate a buzzer sound. 
There are many ways to use a buzzer sound. For example, when a long 
period of time is required for the execution of a program, execution 
termination is indicated by the sounding of the buzzer accomplished by 
inserting a BEEP command at the position of execution termination. 
Also, the fun of a game is increased by using this command. 


The BEEP command has the following three formats. 
(1) BEEP 
Generates a relatively low buzzer sound. 


(2) BEEP 0 
Generates the same sound as BEEP. 


(3) BEEP 1 
Generates a slightly higher buzzer sound. 


SAMPLE PROGRAM 


100 REMkKxkxk BEEP xxx 

11@ IF INKEY$="" THEN 110 

120 IF INKEY$="@" THEN BEEP ® 
13@ IF INKEY$="1" THEN BEEP 1 
14@ GOTO 114 


This program was prepared to generate low buzzer sounds when is 
pressed and high buzzer sounds when Q) is pressed. 
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CHAIN 


| Function — Loads a specified program and executes it from the 
first line. 

CHAIN 
CHAIN ‘file name” 


When a CHAIN command appears during the execution of a program, 
program execution is stopped at that point. Then a program with the file 
name that was specified by the CHAIN command is loaded from a 
Cassette tape, and execution is performed from the beginning of the 
program. 

If there is no file name, the first program found which was stored by 
SAVE or SAVE “ file name”’ is loaded. 

The CHAIN command has the following two formats. 


(1) CHAIN 
Loads first PF B found (program stored by SAVE or SAVE “file 
name’’) and executes it. 


(2) CHAIN “file name” 
Loads PF B of specified file name and executes it. 


@ Since the program is loaded in the presently specified program area, 
the previous program is erased with NEW. 

® Programs stored by “SAVE ALL” and “SAVE, A” cannot be read in 
with the CHAIN command. 

= If a password is attached to a loaded program, the password is also 
read in. 

@ Even when CHAIN is executed, variables are not cleared. 


Input Lists 1—3 into program areas P1—P3, then store them on a cassette 
tape. 


(List 1)..... Program that computes the area of a circle. 

(File name: ‘PRO. 1’’) 
(List 2)..... Program that computes the area of a triangle. 

(File name: “PRO. 2”) 
(List 3)..... Program that computes the area of a rectangle. 


(File name: ‘PRO. 3’’) 
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Also, input List 0 into PO and execute it. List 0 is used to select List 1 — 
List 3 using the CHAIN commands in lines 60—80, read it into the 
PB-770, and then execute the computation. 


List O 


1@ REM CHAIN PRO.@ 

2@ CLS =PRINT "AREA CALCULATIONS" 

3@ PRINT "1CIRCLE 2TRIANGLE 3RECTANGL 
ea 

4@ PRINT “SELECT NO. 

5@ BBS=INKEY$: IF VAL (BBS) >3 THEN 5@ E 
LSE IF VALCBB$)<1 THEN 5@ 

60 IF BB$="1" THEN CHAIN "PRO. 1" 

7@ IF BBS="2" THEN CHAIN "PRO. 2" 

8@ CHAIN "PRO. 3” 


List 1 List 3 
10 REN PRO.1 10 REN PRO. 3 
2G INPUT "RADIUS":RR 2@ INPUT “LENGTH":HH 
30 S=PIXRR*2 3@ INPUT "WIDTH":LL 
46 PRINT S 4@ S=HHxXLL 
5@ END 5@ PRINT S 

6@ END 
List 2 


1@ REM PRO. 2 

2@ INPUT “HEIGHT": HH 
3@ INPUT "BASE”";LL 
4@ S=HHALL’2 

5@ PRINT S 

6@ END 
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| Function — Clears all variables. 
Clears all variables and creates a data area. 


Format CLEAR [first address of data area] 


The CLEAR command is used to clear all numerical variables and 
character variables. 
Numerical variables are cleared to @ and character variables are cleared to 


«6 99 


(null-string). Also, at the same time, registered variables in a program 
are deleted, and the defined array variables are deleted. 

Since the FOR nesting stack is cleared, a FOR-NEXT loop cannot be 
continued. 

When the first address of a data area is specified, an area is created to 
which data can only be written using the POKE command and from 
which data can only be read using the PEEK function. This method is 
ideal for the storage of valuable data. 


(1) Clearing variables 

The program below is used to display data by totalizing the sum of data 
and the number of data. However, if the program is executed again after 
pressing the key, the correct answer cannot be obtained since the 
numerical values assigned to variables S and N at the first execution re- 
main. Therefore, the CLEAR command is inserted between line 10 and 
line 30 as shown in the program on the right so that a correct answer can 
be obtained every time execution is performed. 


1@ PRINT "TOTAL" 10 PRINT "TOTAL" 

3@ INPUT "D="5D 20 CLEAR 

40 S=S+D 3@ INPUT "D=",D 

9@ N=N+1 40 S=S+D 

6@ PRINT "SC"3N3"0="35S 5@ N=N+1 

7@ GOTO 30 60 PRINT "SC"SN35“)="35S 
78 GOTO 38 
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(2) Creating a data area 
First of all, actually create a data area using the CLEAR command. 


Assume that the above program is stored in program area PQ. Perform 
the following key operation: 


CLEAR 3000 @) 


This will create a data area from address 30Q0 (10). 
Next, check the number of remaining bytes by entering: 


SYSTEM &) 


CLEAR 3000 oJ 
SYSTEM oJ) 


P 9123456789 ANGLE @ 
8KB 1615B 30090 


Ready P®@ 


The resulting value should be 1615B (bytes), but this value will differ if a 
program is stored in other program area or if the RAM area has been 
expanded. 

Now enter: 


CLEAR 5000 2) 
anid execute the SYSTEM command again. 


CLEAR 5Q0O wo 
SYSTEM wo) 


P 9123456789 ANGLE @Q 
8KB 3615B 50090 


Ready P@ 


Confirm that the number of remaining bytes has increased. In this way 
the number of bytes available for BASIC programming or variables is 
increased by the amount that the specified size of the data area is de- 
creased. Data area creation using the CLEAR command is required when 
PEEK and POKE are used to read from and write to the specified add- 
resses. Numerical variables and character variables are cleared by the 
CLEAR command, but the contents of the data area remain unchanged. 
Therefore, it is unnecessary to worry about the data area for normal 
programming (when PEEK and POKE are not used). Data stored ina 
data area created by specifying an address in the CLEAR command can 
be input to/read from a cassette tape much more quickly than PUT/GET 
operations using the LOAD, D, address and SAVE, D, address 1, address 
2 commands. 
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(3) Specifying the starting address 

The allowable range for the starting address of the data area is —32769 < 
address < 65536. However, when the starting address is within the sys- 
tem area (&H0QQO through &H@528), and, when a program is stored in 
the computer, the address must be larger than the last address of the 
program. The value specified for the starting address of the data area and 
the actually specified address have the following relationship. 


Specified address Value specified for the starting address 
(hexadecimal) (decimal) 
8808H 8, 32768, —32768 
2600H 8192, 40968, —24576 
4000H 16384, 49152, — 16384 
6000H 24576, 57344, —8192 
7FFFH 32767, 65535, —1 


NOTE: @ through 1320, 32768 through 34088, —32768 through 
—31448 are within the system area. Therefore, they cannot be 
specified (an OM error will occur). 


The usable address ranges for the various RAM capacities are shown 
below. It is not necessary to create data areas for programs that do not 
use PEEK and POKE. Therefore, when a data area has been created, 
release it using a CLEAR command as shown in the table below. 


| BKB @~8191 CLEAR 8192 
0 ~ 16383 CLEAR 16384 


@~24575 CLEAR 24576 
@~32767 CLEAR 32767 


In this way the program area and variable area can be used to their fullest 
extent. Using a CLEAR command in which the data area address is not 
specified does not change the size of the data area. 


* If a data area specification is released using NEW ALL 2) , the address 
number is not displayed. 


Gy SYSTEM, PEEK, POKE, NEW ALL 
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Clears all displays and moves the cursor to the home 
position (top left corner). 
a 


The CLS command is used to clear the screen and to move the cursor to 

the home position at the top left corner. 

It is used to clear the screen for a graphic display. 

(1) When this command is manually executed, the cursor is displayed at 
the (0,1) position. 

(2) When this command is executed during program execution, the 
cursor is displayed at the (0,0) position. 


5 ANGLE @ 


16 CLS 

26 FOR 1=@ TO 368 STEP 12 

38 DRAWCSINIX15+8@>, COS1*15+15) 
40 NEXT I 

9@ END 


This program is used to display the following pattern. 


When a pattern is drawn on the screen as shown above, the screen must 
be cleared before drawing starts. Therefore, the CLS command is used at 
the beginning of the program. 
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| Function — Declares an array. 


DIM array variable name (subscript) [, array variable 
name (subscript) ] 


The DIM command declares an array of the specified name in the memory 
area. Variables assigned by DIM (called array variables) include single- 
precision numerical arrays, half-precision numerical arrays and string 
arrays. 


The general format of DIM can be indicated as follows. 


DIM array variable name (subscript [ , subscript] ) [ , array 
variable name (....... 
(Maximum value of subscript : 255) 


Examples of declaration statements for various arrays are provided as 
follows. 


DIM array variable One-dimensional single-precision DIM A (5) 
name (I) numerical array 

DIM }) variable Two-dimensional single-precision DIM A (2, 3) 
name (I, J) numerical array 

DIM array variable One-dimensional half-precision DIM A! (5) 
name! (I) numerical array 


DIM array variable Two-dimensional half-precision DIM A! (2, 3) 
name ! (I, J) numerical array 

DIM array variable One-dimensional string array DIM A$ (5)* 20 
name$(I) > N 

DIM array variable Two-dimensional string array DIM A$(2, 3) * 20 
name$(I, J) «KN 

> N can be omitted 
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|, J and N are real numbers or numerical expressions with the ranges of 
051<256, 0S J < 256 and OLN < 8O, in which the fractional part 
of numerical value is discarded. 

An array variable name is one character from among the capital alpha- 
betical characters from A to Z. 

The maximum dimensional value is 2, which means one-dimensional 
arrays and two-dimensional arrays can be specified. 

A half-precision numerical array can be specified by placing just 
after the array variable name, and a string array can be specified by 
placing ‘‘ $ ’’ just after the array variable name. 

A string array, in which a character string of ‘‘N’’ length can be assigned, 
is declared by placing ‘‘ *N’’. However, if ‘*N” is omitted, N=16 (i.e. 
an array in which 16 character long strings can be stored). 


6 | ») 


Enter the following program and run it. 


10 CLEAR 
20 DIM A(2,3), B(2,3) 
100 END 


An operational expression may or may not be written between line 20 
and line 100. 

When characters such as Ready PO appear after program execution, 
check the array variable list as follows. 


LIST Ve 
AC ) BC ) 
Ready PO 


The array variable name assigned by DIM can be confirmed using 


LIST V 


Let’s check the content of each array variable by adding the following 
list to the program mentioned above. An array variable must be declared 
by DIM before it is used. 
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30 FOR 1=@T0 2 
40 FORJ=0TO 3 
5Q@ PRINT A(1I,J);B(1, J); 
6Q NEXT J: NEXT | 


When you run the program after adding lines 30 to 60, the following 
is displayed. 


® Execution Example 


Here, the contents of 24 array variables, A (0, 0), B (0, 0) through 
A (2, 3), B (2, 3), are displayed as ‘‘O”’. 

It is important to note that the contents of all the arrays become ‘‘0” 
when the DIM command is executed. 

While the contents of the numerical arrays mentioned above are @, when 
String arrays are declared their contents become null-strings in which 
nothing is displayed. Null-string means that a character string is empty. 
The difference between space-strings and null-strings should be noted. A 
space-string is a string that has one aes (A$(I)=""’) and a null-string 
is a string that is empty (A$(I)=" 


SAMPLE PROGRAM 1 


* Rearrange (sort) program (one-dimensional numerical array). 


10 CLEAR 
20 DIM D5) 
3@ FOR I=1 TO 5 
4@ PRINT "DATA"; I3" ="3: INPUT DCI) 
5@ NEXT I 
6@ REM SORT 
70 F=0 
86 FOR I=1 TO 4 
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140 
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IF DCID<DCI+1) THEN ®=DC TI: DC ITD =D¢ 
[+13 De lelJ=xi FH] 


NEXT I 

IF F=1 THEN 7@ 
REM RESULT 

FOR [=i TO 5 
PRINT DCID; 
NEXT I 

END 


This program enters 5 numerical data and arranges these data in a se- 
quence with the largest value first. 

An array is provided from D(@) through D(5) by the DIM command in 
line 20, but only D(1) through D(S) are used in this program. 

Lines 60 to 110 contain the sort program while lines 120 to 150 contain 
the program which displays the sorted result with the largest value first. 
It is convenient to use array variables by combining them with the 
FOR-NEXT command as shown in the sample program. 


SAMPLE PROGRAM 2 


* Vertical and horizontal totalization (Two-dimensional numerical 


array) 5 


16 
20 
30 
40 
58 
60 
74%) 


CLEAR 

DIM AC3;3)3XC3)3;YC3) 

FOR I=1 TO 3 

FOR J=1 TO 3 

PRINT Cea SJ et ee 
INPUT ACI; J) 

NEXT J:NEXT I 

REM SUBTOTAL 
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8@ FOR I=1 TO 3 

930 FOR J=1 10 3 

10@ XCID=XCID+ACI> JD 

110 YCJI=HAYCIJI+ACIs JD 

12@ NEXT J:NEXT I 

13@ REM RESULT 

140 FOR I[=1 10 3 

15@ PRINT "XC"3 13 ")="3XCT) 
16@ PRINT "YC"3 Is ")="3YCT) 
17@ FOR K=1 TO 5@@:NEXT K 
18@ NEXT I 

19@ END 


This program assigns the data in Table 1 to a two-dimensional array as 
shown in Table 2 in order to obtain vertical and horizontal subtotals 
X(1), X(2), X(3), and Y(1), ¥(2), Y(3). 


Table 1 Table 2 


Pw [3s | a [xm 


es ps | | xe 


Lines 80 to 12Q obtain a subtotal while lines 13@ to 180 display the 
obtained values. 


Gay CLEAR, NEWALL, ERASE, LIST V 
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sini DRAWC 


DRAW: Draws a dot. 
DRAWC: Clears a dot. 


DRAW (X11, Y1) [—(X2, Y2)] 
DeAWe (X1, Yi) [—(X2, Y2)] 


The DRAW command draws dots or lines on the screen while DRAWC 
clears them. 

Since not only characters but dots and lines can be displayed on the 
screen, many kinds of graphs, etc. can be made with this command. 


The ranges of coordinates that can be specified by DRAW (X, Y) or 
DRAWC (X, Y) are as follows. 


—255.5 < X < 255.5 —255.5 < Y < 255.5 


since the range of the screen dot coordinates are 0 S X S 159, and 
osyYs 31, the virtual screen shown below can be considered. 


(—255.55, — 255.5) (255.5, — 255.5) 


Coordinates that can 
be specified. 


Screen of the PB-770 


(@, @) (159, @) 


(0, 31) (159, 31) 


(— 255.5, 255.5) (255.5, 255.5) 


In this figure, (__] is equivalent to the screen of the PB-770. 
The top left corner of the screen is the origin (@, Q). 
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DRAW and DRAWC are used as follows. 


DRAW (X11, Y1) Draws a dot at coordinate (X1, Y1). 
DRAWC (X11, Y1) Erases the dot at coordinate (X1, Y1). 
DRAW (X1, Y1)—(X2, Y2) Draws a line from coordinate 


(X1, Y1) to (X2, Y2). 


DRAWC (X1, Y1)—(X2, Y2) Erases the line from coordinate 
(X1, Y1) to (X2, Y2) 


X and Y mentioned above are numerical values, variable names, and 
numerical expressions with the following range. 


—255.5 < X < 255.5 —255.5 < Y < 255.5 


They are shown on the actual screen rounded off to integers. 
The following program draws a rectangle on the screen. 


40 REM DRAW 
20 CLS 
30 DRAW(10,10)—(10,20)—450,20)—(1 50,10)—(10,10) 
40 END 


A figure can be drawn by providing continuous coordinates with ‘—’’ 
as shown in the program above. 


SAMPLE PROGRAM 


* A program that displays a character magnified two times. 


1@ CLEAR -DIM AC737):CLS 
20 KS=INKEYS 

30 IF K$="" THEN 20 

4@ LOCATE 19,@-PRINT K$ 
5@ FOR I=@ TO ? 

686 FOR J=@ TO ? 

72O@ ACI; JO=POINTCI +152; Jd 
S@ NEXT J:NEXT I 


3@ FOR I1=8 TO 7? 
168 


188 
118 
1208 
138 
140 
150 
168 
170 
188 
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FOR J=@ TO ? 

IF ACI; JO<>1 THEN 168 
DRAW(2k1+8@; 2k J+9) 
DRAWC2kI+81; 2kJ+9) 
DRAW C2x1+8@; 2k J+1@) 
DRAWC2k1+81;2kJ+1@) 
NEXT J:NEXT I 

LOCATE @;51 

END 


This program uses INKEY$ to enter one character, and first displays the 
character at the position which is specified by LOCATE (19,0) as shown 
in the figure below. 

This character is displayed using dots in a square area with a diagonal 
line formed by (152,0)—(159,7) in which the dots that are displayed and 
cleared are checked with the POINT function. Then values ® and 1 are 
assigned to array variable A (I, J). 

Using this array variable as data, the character that is magnified is dis- 
played in a square area with a diagonal line formed by (80,9)—(95,24). 


Gay POINT 


(152,0) 


(80,9) 


(159,7) 


(95,24) 
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| Function Terminates execution of a program. 


The END command terminates execution of a program. The nesting 
stack (control of FOR-NEXT loop and GOSUB) is cleared by the execu- 
tion of an END command. As many END statements as desired can be 
placed anywhere in a program. 

The END command placed at the end of a program can be omitted. 


SAMPLE PROGRAM 


500 FOR 1=0@ TO 1000 
510 KS=INKEYS 

520 IF K$="A" THEN 1000 
530 IF K$="B" THEN 2000 
540 IF K$="C" THEN 3000 
550 IF K$="D" THEN END 
560 NEXT | 

57@ END 


This program is used as part of a menu program. 

After “A’’, “B” or “C” is entered, execution jumps to line 1000, 2000, 
or 3000 respectively. 

When “D” is entered, program execution is immediately terminated. 
However, when key entry is performed with a key other than “‘A’’~"‘D”’, 
or when no key entry is performed, execution is automatically terminated 
after a certain period of time. 


Gay ~=STOP 
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ERASE 
| ae | 


Format ERASE variable name [ , variable name] 


An ERASE command can release registered variables and array variables 
that can be confirmed by LIST V. 
Specification of a variable name for release is performed as follows. 


Variable names 
displayed by a LIST V: AB, AB$, A( ), A! ( ), A$(. ) 
ERASE AB, AB$, A, A!, A$ 


The nesting stack is cleared by execution of the ERASE command, so 
this command should never be used within a FOR-NEXT loop. When an 
unregistered variable name is specified, execution proceeds to the next 
operation. 


GF DIM, LIST Vv 
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FOR~TO~STEP/NEXT 


Repeats the execution from FOR to NEXT fora 
specified number of times. 


FOR numerical variable =i TO 7 [STEP k] 


NEXT suiinerical variable (same variable as that of the 
Formats FOR statement) 
Initial value 
Final value 
Increment 


The FOR-NEXT command repeatedly executes each statement between 
the FOR command and the NEXT command for the specified number 
of times. 


This command has some restrictions as follows. 


B Variables must be numerical variables. 

(2) STEP k can be omitted. In this case +1(STEP 1) is set as the 
increment. 

(3) A variable or a numerical expression can be used for the initial 
value i, final value 7, and increment k. 

‘3 If k > 0 and i >j, FOR-NEXT execution is performed only once. 

5) If kK <0 and i <j, FOR-NEXT execution is performed only once. 

(6) When a FOR-NEXT execution is performed and execution proceeds 
to the following line, the control variable becomes the value of 
i + nk which is larger than j (m = integer). 

(7) Nesting of FOR-NEXT loop can be performed up to 6 levels. 
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(8) If the interval of a FOR-NEXT loop is crossed, an error (FO error) 
occurs. 


FO error occurs. 


(9) When FOR is not executed and NEXT appears, an error (FO 
error) occurs. 

10) The variable for the NEXT command cannot be omitted. 

11) If ERASE or CLEAR is executed, an FO error occurs for the follow- 
ing NEXT statement because the FOR-NEXT nesting stack is cleared. 

12) The values of the control variables are cleared before the first pass 
of all loops. Therefore, the same control variable can be used for 
separate (non-nested) loops within the same program without clear- 
ing the control variable each time. 

(13) A jump into a loop using GOTO or GOSUB statement, etc. cannot 
be performed. 


The following program is used to demonstrate the change of the variable 
depending on the value of the initial value, final value, and increment. 


( 
( 
( 


1Q@ INPUT "FOR I="I,"TO",J,"STEP",K 
2Q PRINT "FOR 1="5I;"TO"\J;"STEP";K 
30 FOR A=I TO J STEP K 

4Q@ PRINT "VARIABLE:A=";A 

50 FOR X=1 TO 10Q:NEXT X 

6@ NEXT A 

7Q@ PRINT :GOTO 10 
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Several execution examples are provided below. 
In the following program, the FOR-NEXT loop has two levels. 


4@ CLEAR 
20 DIM A(Q, 9) 
30 FOR!I=1T0 9 


40 FOR J=1 TO Q 

50 A(I,J)=I*J if | 
6@ NEXT J 

7® NEXT | 


In this example, multiplication is performed and the result is assigned to 
array variable A(I, J) between the two FOR-NEXT loops. 

Since execution is performed 9 times by the internal FOR-NEXT 
loop and execution is performed 9 times by the external FOR-NEXT 
loop, a total of 9 x 9 operations are performed. 

It should be noted in the above example that the internal loop (J) is 
totally enclosed by the external loop (1). This is required whenever loops 
are nested. (See item 7 on page 172.) 

This also applies to the levels from 3 to 6. 


The following program changes the operation by jumping from the 
loop depending on the arithmetic result of the FOR-NEXT statement. 


10 CLEAR 
20 FOR l=1 TO 100 
30 X=X+t| 
40 IF X>=1000 THEN 100 
50 NEXT | 
6@ END 
100 PRINT 1;X 
11@ END 


This program performs the addition of 1+2+3..... , and when the 
result exceeds 1000, it jumps to line 100 and displays the value of the 
variable at that time along with the addition result. 
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Jumping out of a loop using an IF-THEN command can be used. 
Jumping out of a loop once using a GOSUB command and returning 
with a RETURN command to continue execution can also be used. 


The following program provides an example of when there is nothing 
to execute between FOR-NEXT. 


10 LOCATE 8,2: PRINT "HIT!"; 
20 FOR |1=0 TO 50 


30 NEXT | 

40 CLS 

50 FOR 1=@ TO 5O@ 
60 NEXT | 


70 GOTO 10 


There is no statement to be processed between the FOR-NEXT loop in 
lines 20 and 30 and lines 50 and 60. However, the FOR-NEXT command 
is executed the specified number of times even in this case. 

This command which seems to be nonsense is often used to kill time and 
is called a “wait loop”’. 

In this program, the characters “HIT!” are repeatedly displayed for a cer- 
tain period of time, erased for a certain period of time, and displayed 
again for a certain period of time. 

As the final value of the variable increases, the waiting time becomes 
longer. 


SAMPLE PROGRAM 


* A program that provides a display increasing the number of “ x* ”’ by 
one on each successive line. 
1@ CLS 


20 N=1 

30 FOR I=1 TON 

4@ PRINT "X"; 

5@ NEXT I 

6@ PRINT 

7@ N=N+1 

S@ IF N>=2@ THEN END ELSE 32 
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This program increases the final value of the FOR-NEXT command 
by one each time and increases the number of ‘‘*”’ displayed by one 
each time. The execution example is as follows. 


Xx 
xx 
XxX 


XKKX 
XKKKXK 
XKXKKX 


Gay” |F~THEN~ELSE 
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| Function Reads data stored on a cassette tape to a variable. 
GET variable [ , variable] 
GET “file name” variable [ , variable] 


The GET command is used to read data stored on a cassette tape by the 
PUT command to a variable. 

The file name can be omitted as shown in the above format, but, in that 
case the first file that appears on the cassette tape (MT) is read. The data 
that are read can be sequentially assigned to different variables by punc- 
tuating the variables with commas. 

However, when data is assigned to a numerical variable, the space at 
the beginning of the data is ignored. 


The following program stores the values of variables A, B, C and D 
with the file name ‘‘TEST” on a cassette tape. 


10 REM PUT MT 

20 A=10:B=20:C=30: D=4@ 
3Q@ PUT "TEST" A, B, C, D 

4Q@ END 


The following example program uses a GET command to read data 
stored on a cassette tape with the file name ‘‘TEST”’. 


10 REM GET MT 

20 GET "TEST" E, F, G, H 
30 PRINT E;F;G;H 

40 END 
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In this example, the data A, B, C, and D are read into the variables E, F, 
G, and H. An important item is that data are stored on cassette tape in 
an A, B, C, D sequence. 

Although data are read in an A, B, C, D sequence during cassette tape 
playback, the data of A is assigned to E, and data of B is assigned to 
F,.... sequentially. 

If GET is executed with variables that exceed the variable data stored on 
a cassette tape, an error (DA error) occurs because of data shortage. 


* A program to store a person’s name and data on cassette tape, and 
to read and display a person’s data when a name is entered. (Number 
of characters of name and data are both limited to 16 or less.) 


1@ CLEAR 

20 DIM N$¢(10),D$¢C10) 

3@ INPUT "PUT:O GET: I END:E"3M$ 
40 IF M$="0" THEN GOSUB 100 
0@ IF M$="I" THEN GOSUB 300 
60 IF MN$="E" THEN END 

7@ GOTO 30 
100 I=@ 
11@ INPUT "NAME: "3N$CT) 
12@ PUT N$C¢I) 
130 IF N$CID="6" THEN 180 
14@ INPUT "DATA: ";D$CI) 
15@ PUT D$C¢I) 
16@ I=I+1 

17Q@ IF 1<10@ THEN 11@ 

18@ RETURN 
300 J=0 
31@ INPUT "NAME: "3 AS 
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320 GET N$¢J) 

330 IF N$¢J>)="@" THEN PRINT "NOT FOUND 
"GOTO 382 

340 GET DSC J) 

35@ IF A$<>N$CJ> THEN 370 

36@ PRINT A$; "="3D$CJ>-GOTO 380 

378 J=J+1:GOTO 320 

380 RETURN 


This program consists of two subroutines. 

Lines 100 to 180 provide a subroutine to store data on a cassette tape, 
while lines 300 to 380 provide a subroutine to search for and read data 
from a cassette tape. 

A name is entered in array variable N$(I), and data is entered in D$(I). 
Then storing and reading are performed with these two variables as a 
pair. 

When “O” is entered for the menu in line 30, the storing subroutine 
from line 100 is executed with the input of a name and data continuous- 
ly performed. Up to 11 data inputs can be performed. However, since 
it is necessary to attach “0” to the end of the last name (to indicate data 
end), up to 10 data inputs can actually be performed. 

When “I” is entered for the menu in line 30 to search for the name of 
a person, then the name and data are read from a cassette tape. 

After the name is found, the name and data are displayed and the 
program returns to the menu in line 30. 

Enter “‘E” for the menu to terminate the program. 


Gay” PUT, SAVE 
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GOSUB/RETURN 


Causes a jump to a subroutine and a return toa 
main program. 


GOSUB line number 1 S line number < 10000 


GOSUB PROG n O<n<10 


j 
(n indicates the program area 


RETURN No.) 


The GOSUB command causes a jump to a subroutine of a line which 
is specified by a variable or a numerical expression. The RETURN com- 
mand causes a return from the subroutine to the main program. 


Example 


es 
GOSUB 200 GOSUB PROG 4 


Numerical expression GOSUB N *5 GOSUB PROG L/10 


The PB-770 allows a jump to a subroutine and a return to a main pro- 
gram in other program areas, as well as a jump to a subroutine in the 
Same program area as shown by the above formats. 


In the following program, the execution flow is shown by changing the 
layout. 


4@ CLS Subroutine (1) 


20 ZS$=INKEYS 10@ A=ASC(Z$) 
Main 30 IF z$=" "THEN 20-—— 11@ RETURN 
Program] zg GOSUB 100 a (2) 


LOCATE 0,2 
FOR |= TO 19 


5@ GOSUB 200 =———~ 


60 END PRINT CHRS(A+1); 
NEXT | 


RETURN 
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Lines 10 to 60 provide the main program, lines 100 and 110 provide one 
subroutine, while lines 200 to 240 provide another subroutine. 

When the RETURN command is executed as shown by the arrows, 
a return is made to the statement following the GOSUB command and 
execution of the main program continues. 


This program can be rewritten as follows by changing its format slightly. 


10 CLS Subroutine (2) 
30 IF Z$=""THEN 20 _|100 A=asc(z$) | 210 FOR I= TO 19 
40 GOSUB 100 110 GOSUB 200] | 220 PRINT CHRS(A+1) ; 


"120 RETURN | 290 NEXT | 
50 END 240 RETURN 


Although the contents of this program is exactly the same as the pre- 
viously mentioned program, this program has a double structure in which 
subroutine (2) is included in subroutine (1). 

Up to 12 nesting levels can be used with the GOSUB/RETURN com- 
mands. 

Precautions should be taken concerning the following items when 
GOSUB/RETURN commands are used. 


(1) One subroutine must have at least one RETURN command, and can 
have as many as desired. 

(2) If the line specified by a GOSUB command does not exist, an error 
(UL error) will occur. 

(3) When GOSUB PROG n is executed, if a program is not written in 
program area n, an error (UL error) will occur in the present program 
area. 

(4) When there is no GOSUB command for a RETURN command, an 
error (GS error) will occur. 
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(5) Up to 12 GOSUB nesting levels can be used. (If there are 13 levels or 
more, an error (NO error) will occur.) 

(6) When a fraction is included in a line number or program area number 
specified with GOSUB, execution is performed with the fraction 
discarded. 


SAMPLE PROGRAM 


* Slot machine game program. 


1@ CLS 

286 GOSUB 200 

38 GOSUB 3280 

4@ GOSUB 420 

08 LOCATE 3530 

6@ PRINT "POINT"$N 

7@ LOCATE @;0:END 
200 X=INTC1@XRNDD 
210 Y=INTC1@XRND) 
22@ Z=INTC1@XRND)D 
230 RETURN 
30@ LOCATE 6:2 
31@ PRINT X35" "s3Y3" "323 
320 RETURN 
400 IF X=Y THEN IF Y=2 THEN N=1@@:RETU 

RN 

41@ IF X=Y THEN N=4@: RETURN 
420 IF Y=Z THEN N=3@: RETURN 
430 IF X=2 THEN N=2@: RETURN 
440 N=0 
45@ RETURN 
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This program displays 3 numerals. If all of the 3 numerals are identical, 
100 points are given, and if 2 numerals are identical, 40, 30 or 20 points 
are given depending on their locations. 

If all 3 numerals are different, 0 points are displayed. 

Lines 200 to 230 provide the subroutine that generates the 3 numerals 
with the RND function, while lines 300 to 320 provide a subroutine that 
displays the numerals at the center of the screen, and lines 400 to 450 
provide a subroutine that checks the number of points given. 

Lines 10 to 70 provide the main program which simply controls each 
subroutine and displays the number of points given. 


gay” GOTO 
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Function — Causes an unconditional jump to a specified line. 


GOTO line number 1 < line number < 10000 


Formats GOTO PROG n Osn<10 
n : Indicates the program 
area No. 


The GOTO command unconditionally jumps to a specified line number 
or to the beginning of a program in another program area specified by a 
variable or a numerical expression. 

If the specified line number does not exist, or there is no program in the 
specified program area, an error (UL error) will occur. 

If a fraction is included in a specified line number or in a specified pro- 
gram area number, the fraction is discarded when execution is performed. 


Example 


[ine number [Program area 
GOTO 500 | GOTO PROG 4 


SOTON | GOTOPROGN 
GOTO N*5 GOTO PROG N/10 


SAMPLE PROGRAM 


* Simplified Digital Clock Program. 


1@ INPUT “H="3Hs "M="3M3"S="5S 


2@ CLS 
3@ IF H<18 THEN LOCATE 83;@: PRINT H;": 
“;: GOTO 5@ 


4@ LOCATE 7;@:PRINT H; "2" 
5@ IF M<1@ THEN LOCATE 12;@:PRINT M3" 
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110 
120 
200 
210 
220 
380 
318 
328 
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>"3;:GOTO 7@ 

LOCATE 11;@:PRINT M3": "5 
IF S<1@ THEN LOCATE 163;90:PRINT S;" 
:"3:GOTO 39@ 

LOCATE 15;@:PRINT S; 

FOR I=2 TO i20:NEXT I 
S=St1 

IF S>=68 THEN 280 

GOTO 7@ 

S=0: M=M+1 

IF M>=680 THEN 388 

GOTO 5@ 

M=0: H=H+1 

IF H>=24 THEN H=@ 

GOTO 38 


When you run this program, H (hour), M (minutes), and S (seconds) are 
requested. After the present time is entered and the J] key is pressed, 
time is continually displayed up to seconds. 

Since the internal clock of the microcomputer is not used for this 
program, it does not show the exact time, but indicates the approximate 


time. 


If it gains, adjust by increasing the final value of the FOR command in 
line 90, and if it loses, adjust by decreasing the final value. 

Many GOTO commands are used in this program. 

The program creates an infinite loop using GOTO commands in lines 
120, 220, and 320. 


Gay GOSUB/RETURN, IF-THEN-ELSE 
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IF~THEN~ELSE 


Executes the contents after THEN or ELSE depending 
on the condition after IF. 


conditional THEN line number ELSE line number 
expression command command 
A numerical expression cannot be used as a line number. 


The IF-THEN command performs a conditional jump while a GOTO 
command performs an unconditional jump. 

When the conditional expression is true, the THEN statement is exe- 
cuted, and when it is false, the ELSE statement is executed. If there is 
not an ELSE statement, the next line is executed. 

A line number that represents a branch destination, or a command state- 
ment can be inserted in THEN and ELSE statements. 

Multistatements can be performed in THEN or ELSE statements using 
colons as shown below. 


IF conditional expression THEN~:~:~ELSE~:~:~ 
THEN statement ELSE statement 


An IF statement can be inserted in the THEN or ELSE statement as 
shown below. 


IF conditional expression (1) THEN IF conditional expression (2) THEN 
™~ELSE~ ELSE ~ | 
= 7 


aS Executes when conditional Executes when conditional 
Executes when conditional expression (1) is false. expressions (1) and (2) are 
expression (1) is true and both true. 
when conditional expression 
(2) is false. 


Examples of IF ~ THEN ~ ELSE statement usage are shown below. 
These programs check whether a triangle can be made or not after three 
sides are entered. 


(1) 10 INPUT "A=";A, "B=";B, "C=";C 
20 IF A+B>C THEN 40 
30 GOTO 50 
4Q@ IF ABS(A-B)<C THEN 60 
50 PRINT "NOT TRI": GOTO 1 
60 PRINT "TRI": GOTO 10 
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10 INPUT "A="3A, "B=";B, "C=";C 
20 IF A+B>C THEN IF ABS(A-B)<C THEN 40 
3Q@ PRINT "NOT TRI": GOTO 10 

40 PRINT "TRI": GOTO 10 


10 INPUT "A=";A, "B=";B, "C=";C 

20 IF A+B>C THEN IF ABS(A-B)<C THEN 40 

3Q@ PRINT "NOT TRI": GOTO 10 

4Q IF A=B THEN IF B=C THEN PRINT "E.TRI": GOT 
O 1@ ELSE PRINT "ILTRI": GOTO 1 

5Q@ IF B=C THEN PRINT "I.TRI": GOTO 10 

6@ IF A=C THEN PRINT "I.TRI" : GOTO 10 ELSE 
PRINT "TRI": GOTO 10 


Example programs (1) and (2) check whether a triangle (TRlangle) is 
formed or not (NOT TRlangle) when three sides A, B, and C are entered. 
In example(1),two triangle conditions (A+B>C, |[A—BI<C) are checked 
in separate lines (line 20 and line 40), while in example (2), they are 
checked in one line (line 20). 
Also, in example(3), the program checks whether the values form an equi- 
lateral triangle (Equilateral TRlangle) or an isosceles triangle (Isosceles 
TRlangle), as well as whether they form a triangle (TRI) or not (NOT 
TRI). 
In example (3), whether a triangle (TRI) is formed or not is checked first 
in line 20. If a triangle is not formed, ‘NOT TRI” is displayed and a 
return is made to line 10. 
If a triangle is formed, whether the three sides are equal or not is check- 
ed in line 40. If the three sides are equal, ““E.TRI”’ is displayed. If two 
sides are equal, “I.TRI” is displayed, and if all three sides are not equal, 
oe is simply displayed in lines 40 to 60, and a return is made to line 
0. 
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SAMPLE PROGRAM 


* Program to draw a pattern on the screen with dots. 


1@ CLS 

20 X=0: Y=0:N=1:M=1 

38 DRAWCKs Y) 

40 X=X+N: Y=Y+M 

5@ IF X>=158 THEN N=-1 

6@ IF Y>=31 THEN M=-1 

7O IF X<=0@ THEN N=1 

80 IF Y<=@ THEN M=1 

9@ IF X=1 THEN IF Y=31 THEN BEEP 1: END 
i1@0@ GOTO 30 


This program determines whether or not the value of the dot coordinates 
(X, Y) on the screen is within the screen limitation by the IF-THEN 
command (lines 50 to 80) to control whether the values of the X, Y 
coordinates are increased or decreased. 

When the values of X and Y become X = 1, Y = 31 (line 90), a beep 
sound is generated, and the program Is terminated. 

The next figure shows the execution result. 


@ Execution Example 


PACK UR OA KOKO KA OX 9 

Sere 

att tthe ace 
Ca 


ed 
erectctcchebe 
eee 
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INPUT 


Requests data entry (numerical value, character) from 
the keyboard to a variable. 


INPUT variable [ , variable] 
INPUT ‘‘prompt”, variable [ , ‘‘prompt’’, variable] 
INPUT ‘‘prompt”’ variable [ , ‘‘prompt’’; variable] 


Formats 


The INPUT command is used to enter data from the keyboard to a 
variable. The basic formats of the INPUT statement are as follows. 


Example 1 INPUT A 

Example 2 INPUT X, Y, Z 

Example 3 INPUT “AGE”,A 
Example 4 INPUT “NAME”: A$ 
Example 5 INPUT “X=; X, "Y="; Y 


When the INPUT command is executed, the PB-770 displays an input 
request message and waits for data input. 

For example, when example 1 is executed, ‘‘ ? ” is displayed as follows 
and the cursor turns on and off at the right of ‘? ”’. The data input 
setup has been completed. 


Ready PO 


Display during INPUT ? __ (Cursor) 
command execution. 


Data input is performed by pressing keys. Always press the (ener) key or 
@] key at the end of data input. It should be noted that the key 
functions the same as the @] key during INPUT statement execution. 
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a Variables that can be used in an INPUT statement are as follows. 


[Examples] 

Numerical variable ...... INPUT X 

Character variable....... INPUT X$ (Up to 7 characters can be 
entered.) 

Registered variable ...... INPUT XY 
INPUT XY$ (Up to 16 characters can be 
entered.) 

Array variable.......... INPUT X! (7), Y! (i 7) 


Half-precision aie array 
INPUT X (i), Y (i, 
Single-precision ane array 
INPUT A$ (i), INPUT A$ (i, 7) 
String array 


(1) Numerical value input 


Let’s check INPUT statement usage and functions by using a simple 
program. 


10 INPUTA ......... Input command. Provides data input to 
variable A 

20 PRINTA......... Output command. Displays the contents 
of variable A. 

3Q@ GOTO 10......... Jump command. Moves program execu- 


tion to line 10. 


After inputting this program, enter RUN @] to execute it. ‘?” is display- 
ed. Now, enter 3.6]. If the entry is performed correctly, the same 
numerals are displayed again by the PRINT statement as follows. 


G3) RUN @) 3.6 ©) 
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A value can be entered by inputting a calculation expression that results 
in the value, but this is limited to INPUT statements using numerical 
variables. 

Let’s confirm this using the previous program. 


3 RUN@) 100—20/5 @) RUN 
?12Q0-20/5 


96 
? 


(2) Character input 
Perform character input by changing the program of (1). The new pro- 
gram is as follows. 


10 INPUT A$ 


2Q@ PRINT A$ 
30 GOTO 10 


When character input is performed, a character variable is used as shown 
above. When you execute this program, input is requested by the dis- 
play of “‘? ”’ the same as for numerical value input. When entering the 
character string ABC, the display becomes as follows. 


RUN @] asc @) SUN 
?ABC 
ABC 
?_ 


When the numerical value 123 is entered, 123 is displayed. However, 
it should be noted that this 123 is a character string and not a numerical 


value. 

When data is input to a character variable, it is unnecessary to enclose 
the character string with “ ”. If “ ” is used, the quotation marks 
would also be entered as character data. 
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= Data that can be input to each variable by an INPUT statement. 


A. Numerical variable 
a. +1x 10-7? to +9.99999999999 x 10°? and O 
b. Coy expression for a numerical value (Example: 200 x 
5+2 
c. Numerical variable from A to Z (Fixed variable) 
d. Registered variable 
e. Array variable 


B. Character variable 


a. Fixed character variable........ Up to 7 characters and sym- 
bols. 

b. Registered character variable .... Up to 16 characters and sym- 
bols. 

c. Array variable................ Up to 79 characters and sym- 
bols. 


(3) Multiple variable input 
Multiple variables can be used in an INPUT statement. (Multiple INPUT 
statements can be arranged in one statement as shown below.) 


10 INPUT X 
20 INPUT Y > —~>190 INPUT X, Y, Z 
30 INPUT Z -ouinePUnctuate variables 


with commas. 


When you execute this INPUT statement, ‘‘? ” is displayed at first to 
request the input of the value of X. After the value of X is entered, the 
values of Y and Z are requested in turn. After the value of Z is entered, 
this INPUT statement is terminated. 
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Variables, such as numerical variables, character variables, etc. can be 
used with all combinations and sequences in this kind of INPUT state- 
ment as shown below. 


12 INPUT A$, X 


¢¢ ” 


However, a ‘‘,’’ (comma) must be used for punctuation between vari- 
ables. 


(4) INPUT statement that displays a message 

If a character string enclosed with “ ”’ is inserted between INPUT and a 
variable, the character string is displayed as it is. This is called a prompt. 
Incorrect input can be reduced by clarifying data for input with this 
message. 


Input the following INPUT statement and execute it. 


10 INPUT "AGE": A 


Then the following is displayed. 


RUN @] RUN 
AGE? 
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Next, this INPUT statement is changed as follows. 
10 INPUT "AGE", A 
When you run this program, the display is as follows. 


RUN @] RUN 
AGE 


When “? ” (input request display) should appear after a message, a “ ;” 
is used for punctuation between the message and the variable. 
This INPUT statement can be changed for input of two or more variables. 


10 INPUT "HEIGHT =" ;X, "WEIGHT =";Y 


In effect, this combines the following two INPUT statements into one 
INPUT statement. 


10 INPUT "HEIGHT =";X 


+10 INPUT "HEIGHT ="; 
20 INPUT ema 


X, "WEIGHT="; Y 
When you run this program, the display is as follows. 


RUN &] RUN 
17 5(@)]| HEIGHT=?175 


6 5 WEIGHT=?65_ 


= Number of characters in character string used for a message 


The maximum number of characters for a message is 79 including the 
line number and INPUT command. 
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LET 
racien | Age cinionmie 


LET variable = expression 


The LET command placed at the beginning of an assignment statement is 
generally used in the following formats. 


(Example 1) LET A=10 LET A$= “GAME” 
(Example 2) LET X=SIN (S-—PI/4) LET X$=A$+B$ 


The assignment statement assigns the value of the expression on the right 
side of the = sign to the variable on the left side of the = sign. A 
numerical expression corresponds to a numerical variable, and a character 
expression corresponds to a character variable. If the correspondence is 
not correct, a TM error is displayed. 


= Numerical value range 
A numerical value can be assigned to a numerical variable within the 
following range. 


—10'8 < numerical value < 10'% 
= Character string range 
When the left side is a fixed character variable — up to 7 characters. 
When the left side is a registered character variable — up to 16 
characters. 
When the left side is a character array variable — up to 79 characters. 


@ LET can be omitted. 
10 LET A=1 isthesameas 10 A=1 
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LOCATE 
[rests [Sees trewnerpeiion 


Format LOCATE X, Y 0<x<20, 0<Y<4 


The display screen of the PB-//0 is provided with 20 x 4 display 
positions as shown below. Display is generally performed from the 
left end of the screen by executing a PRINT statement. However, the 
display position can be freely changed using the LOCATE command. 


F h \*0 12.3.4 5 6 7 8 9 1011121314 15 16171819 
or example, when y 


you specify LOCATE RAR Seite ese MMe TE ease = 
10, 3, the display EMT Te Me Mita! el pal AIM 
position is specified EME Se Wal aeVeeM a=) 2M OGM (eet 
at (10, 3). PLETE TEE mt EEE ET 


However, when 3 isspecified for the Y coordinate, the display is scrolled. 
To avoid scroll except for LOCATE 19,3 (lower right corner), use a 
semicolon at the end of the PRINT statement. 


List A List B 


10 X=1 10 X=1 

20 X=X+1 20 X=X+1 

40 PRINT "X=";X 3Q@ LOCATE 0,0 

5@ GOTO 20 4@ PRINT "X=";X 
5Q GOTO 20 


When you execute List A, the following is displayed. 


Numerals appear continuously 
from the bottom of the screen 


and disappear toward the top 
of the screen. 


When you add line 30 as shown in List B, the display is changed in such a 
way that only the ‘*X = Numeral” is gradually increased at the top left 
corner of the screen. 
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} Function Writes data to a specified address. 


| Format POKE address, data 


The POKE command writes data to a specified address. Both the address 
and the data are specified by integers. (Fractional values are discarded.) 
Addresses and data must be within the following ranges. 


—32769 < address < 65536 
0 < data < 256 


See CLEAR for information on addresses. 


CAUTION: 

Never write data using POKE in the system area (&HQQQQ through 
&H@528) or in a user area where programs have been stored. Otherwise, 
the computer will not work normally especially when data are written in 
the system area. In this case switch the power OFF and then ON again, 
and enter NEW ALL @] to clear all the programs and variable contents. 


SAMPLE PROGRAM 
Write data to a specified address using the following program. 


10 REM POKE EXAMPLE 

20 INPUT ”“—32769<ADDRESS<65536”, A 
30 INPUT "O<=DATA<256”, D 

40 POKE A, D 

5@ PRINT PEEK A 


E27 CLEAR, PEEK 
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PRINT/LPRINT 


PRINT: Performs output to the display. 
LPRINT: Performs output to the printer. 


PRINT expression [ , expression | 


Display output PRINT expression [ ; expression | 
PRINT $ registered character variable 


LPRINT expression [ , expression | 
Printer output LPRINT expression [ ; expression | 


The PRINT and LPRINT commands are almost the same with the only 
difference being that output is either to the display or to the printer. 
However, when they are used with the TAB function, some differences 
occur. 


Different kinds of data such as characters, numerical expressions, all 
types of graphic data, and numerical values can be displayed using a 
PRINT statement. 

As an example, it can be used as follows. 


PRINT 1.4142] 
PRINTA*B2@]..... Since A and B are variables, 
the result is displayed. 


When these PRINT statements are executed, line change is performed 
after data is displayed. Run the following program as an example. 


10 A=0:B=3 
20 PRINT 1.414 
3Q@ PRINT A*B-2 
40 INPUTC 


Then the following is displayed. 
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RUN @] { RUN 
1.414 


—2 
P Lok Cursor 


A PRINT statement can be made to display a plural number of expres- 
sions or character strings using commas ( , ). 


10 A=0:B=3 
20 PRINT 1.414,A*B-2 
30 INPUT C 


When you run this program, line change is performed each time data is 
displayed, the same as the preceding display. 


Although the display screen of the PB-770 consists of 4 lines, if output 
is performed on the 4th line, each line is scrolled up. 


10 PRINT 1, 2, 3, 4 
20 END 


4 
RUN 


1 
Ready PQ a scrolled up. 
= 4 


Although output is performed with line change using commas, if a 
plural number of expressions and character strings are punctuated with 
semicolons, they are displayed on the same line as follows. 


199 


CHAPTER 4 COMMAND REFERENCE 


10 A=0:B=0 
20 PRINT 1.414;A*B-2 
30 END 


RUN 
1.414-2 


Ready P@ 


An easy-to-read message can be given using the following method. 


1Q@ PRINT "ANSWER=" ; AXB-—2 
20 END 


RUN 
ANSWER=—e2 


Ready P@ 


Character and numeral output can both be performed with left justifi- 
cation as shown in the previous output examples. However, since the 
output of a numerical value is performed by including one position for 
a sign, a space occurs where the + sign is omitted when the value is posi- 
tive. A LOCATE command and functions such as TAB and USING, with 
which the display location and format can be specified, are used witha 
PRINT statement. 


10 CLS 

20 A=1 

30 LOCATE Q, 2 

40 PRINTA 

50 A=A+1 

60 IF A<100 THEN 30 
70 END 
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aera er 9,2 


‘99 


Numerical values 1 through 99 are displayed in sequence at the location 
of the coordinates (10,2) and (11, 2) of the character screen as displayed 
above. The space for the sign is displayed at the (9, 2) coordinate point. 


10 CLS 

20 A=13:B=5:C=38 

30 PRINT TAB(5) : A; TAB(19) ; B; TAB(15) ;C 
40 END 


RUN Space for the sign, ——______— 
A 13 AS5 A 38 


—TAB (5)— 
TAB (10) 


TAB (15) 
9G1234 10 15 19 


Display is performed starting from the location specified by the TAB 
function when using a PRINT statement together with the TAB func- 
tion. 

Display can be performed with a uniform format in accordance with 
the USING function format as shown below. 


10 A=3.1415 : B=31.415 : C=314.15 
2Q PRINT USING "###.4##";A 

30 PRINT USING "###.##"; B 

4Q PRINT USING "###4.##";°C 

50 FOR !=1 TO 1000: NEXT | 

6Q@ END 


Rounded to 2 decimal places. 
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# PRINT command expanded function (not available with LPRINT) 

(1) Display pattern definition 
Display pattern can be defined by including a “$” directly before 
registered character variables suchas$AB$. At this time, hexadecimal 
values (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, A,B, C, D, E, F) must be assigned 
to the registered character variable. 

(2) Control code output 
CLS and TAB can be executed using the PRINT command. Output is 
performed using the CHR$ function as in: PRINT CHR$(A). The 
control codes (numerical variable A) and output functions are as 
follows. 


| Code | Function 


Gay LOCATE, TAB, USING, CLS 
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PUT 


| Function — Stores variable data on a cassette tape. 
PUT variable [ , variable] 
PUT “file name” variable [ , variable] 


The PUT command stores variable data on a cassette tape. The format 
of the data file to be stored is ASCII. The GET command is used to read 
the data file. 


STU rca aa 
2) PUT “SALES” A[,B,C....] 


As shown in the above format (1), the file name may be omitted. In this 
case, the file name should not be specified in the corresponding GET 
command. By separating two or more variables with commas, it is pos- 
sible to store plural variables as a data file by a single PUT command. 
Variables after PUT are stored on a ‘first come, first served’ basis. 
Numerical data is output in the same manner as it is output to the screen 
when the USING function is not employed. 


The following program stores the contents of array variables A(Q) to 
A(1@) with a PUT command. It is assumed that the array variables con- 
tain data. 


10 REM PUT 

2@ DIN AC1@) 

30 FOR K=1 TO 10 
40 ACKI=K 

0@ PUT ACK) 

6@ NEXT K 

7@ END 
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The following program reads the data stored on a cassette tape into the 
PB-770 using a GET command. 


1@ REM GET 

2@ DIM BC1@) 

3@ FOR K=1 TO 1@ 

4@ GET BCK) 

9Q@ PRINT "“BC"3K3")="3BCK) 
6@ NEXT K 

7@ END 


In this example, a FOR-NEXT loop is used to move the contents of 
array A to array B. When storing plural data items, pay attention to the 
Sequence in which they are stored. 


gay” GET, SAVE 
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READ/DATA/RESTORE 


READ: Reads data from a DATA statement into a 
variable. 

DATA: Stores data (constants, characters) in a pro- 
gram to be read by a READ statement. 

RESTORE: Specifies the line from which the DATA 


statements are read. 


READ variable [ , variable] 

DATA data [ , data] [ , ‘character data’’] 

RESTORE 

RESTORE line number (1 S line number < 10000) 


Formats 


A READ statement is used with a DATA statement. 
When a READ statement is executed, data are read from a DATA state- 
ment into variables on a one to one basis. 


The following is the simplest example of a READ/DATA statement 
program. 

10 READ A 

20 READ B$ 

30 PRINT A;B$ 

42 DATA 7,"B" 

50 END 


When you run this program, 7 is assigned to variable A, and ‘‘B”’ is 
assigned to character variable B$. The variable and data types must 
match. 
Since as many variables as desired can be written continuously in a 
READ statement, line 10 and line 20 can be written in one line as 
follows. 


10 READ A, BS 


It makes no difference whether character data is enclosed with double 
quotation marks or not as follows. 
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40 DATA 7, B 


However, if data is not enclosed with double quotation marks, spaces are 
ignored as data. Therefore, if a space is required, it must be enclosed 
with double quotation marks. 


DATA 7, ae Me de 


a rs | 


This space is ignored. 


NOTE: Spaces after data are not ignored. Therefore if a space is provided 
after a numerical value, an ST error occurs. 


DATA 1,2 ,3,4 
T_T These spaces are not ignored. 


Double quotation marks and commas cannot be written in character 

data except for the above format. 

A DATA statement that does not include any data is read as a null string. 
DATA,  , isregardedas DATA’ "" ”" 

Although variables in a READ statement must correspond to DATA 

statements on a one to one basis, any number of variables or data can be 

placed in each statement. 


10 CLEAR 
2Q@ DIM C(10) 
3Q@ READA,B 
4Q@ FOR I=1 T010 
5@ READ C(I) 
60 NEXT | 
7Q@ DATA 1,2,3 
8Q DATA 4,5,6,7,8,9 
9Q@ DATA 190,11,12 
When you run this program, data are assigned to each variable as follows. 


A B C(1) C(2) C(3)......... C(8) C(9) C(10) 
ae oe { { { { { 
12 3 4 Se 10 11 12 
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If the number of data is less than the number of variables to which data 
are assigned by a READ statement, an error (DA error) occurs. However, 
if the number of data is more than the number of variables, an error 
does not occur but the extra data are ignored. 

A DATA statement can be placed before a READ statement. 

The DATA statement from which data are to be read by a READ state- 
ment can be specified using a RESTORE statement. 


A RESTORE statement has two different formats, one in which the line 
number is written, and another in which the line number is not written. 
If the line number is not written, the following READ statement reads 
data form the first DATA statement when RESTORE is executed. 

10 READ A, B 

20 RESTORE 

30 READ C,D 

40 PRINT A;B;C;D 

50 DATA 7,2 

6@ END 


When you run this program, the assignments performed are A = 7, B= 2, 
C=7 and D=2. 
DATA statements can also be specified by including the line number. 


10 RESTORE 50 
20 READ A,B 
30 PRINT A;B 
40 DATA 3.7, 6.5 


50 DATA 7.1, 9.3-°°°° DATA statement specified by RESTORE 
6Q@ DATA 5. 10.2 statement in line 10. 
7QO END 
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When you execute this program, A = 7.1 and B = 9.3 are performed as 
the assignment. 

Variables and numerical expressions can be used for a line number 
specification of a RESTORE statement, but the variable or numerical 
expression value used must correspond to a line number which includes 
a DATA statement. 


Precautions should be taken when a READ statement is used in a pro- 
gram whose execution moves to a plural number of program areas. 


P® 10 READ A,B P1 1@ READ X, Y 
20 GOTO PROG 1 20 PRINT X;Y 
30 DATA 1,2,3,4 30 DATA 71,65 
40 END 


When you execute this program, displayed data are not 71 and 65, 
but are 3 and 4. In other words, although the execution of this program 
has been shifted to P1 by GOTO PROG 1, the DATA statement of PQ is 
still used. 

This is useful when the DATA statement of a main program is used in 
a subroutine. 

If it is necessary to read 71 and 65 into X and Y in this program, 
specify the line number at the beginning of Program P1 as follows. 


5 RESTORE 30 


CAUTION: Be sure not to write DATA statements in lines 2200 through 
2299 or in lines with 22 in the last two digits of the line 


om numbers (e.g. 22, 322, 922). Otherwise, such DATA state- 
ments will be ignored. 
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[Function Provides comments for programs. 


Format REM comment statement 


Unlike other commands, the REM command does not execute anything. 
Since anything can be freely written after REM, a program explanation 
can be written at important points in a program as shown below so that 
the contents of each part of a program can be understood by looking at 
the list. 


10 REM *PROCESSING RESULTS* 
20 DIM A (1) 


100 REM *PRINT OUT# 


500 END 


Since all of the characters and symbols written after REM are considered 
to be comments, it cannot be used before other commands to form a 
multistatement. 


Example: 150 REM *TOTAL« : INPUT N 
Ld 


Not executed 
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STOP 


/Function Suspends program execution. 


If the STOP command is found in a program during program execution, 
a STOP message is displayed and program execution is suspended. The 
execution of a program suspended by the STOP command can be re- 
started from the instruction following STOP by inputting the CONT 
command. 


Let’s check the function of the STOP command in the following 
program. 


10 A=1:B=5 
20 C=A+B 
3@ STOP 

4@ PRINT C 
50 END 


When you execute this program, the following is displayed. 
STOP PO — 30 
This indicates that execution is suspended by the STOP command in 
line 30 of program area PQ. 
In this state, the contents of the variables can be checked as follows. 
A — 1 Displays the value of A. 


C —6_ Displays the value of C. 
Also, an optional value can be assigned to a variable by entering 


C=0 @) 
In actual practice, this command is used to stop execution of a program 


at a point where the operation is doubtful to confirm the contents of 
variables and aid in debugging. 
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[1] Execution can be resumed using CONT even if the following opera- 
tions are performed while a STOP command is in effect. 
(1) Manual calculation. 
(2) Assignment to a variable (Assignment without using LET). 
ia Confirmation of the contents of a variable. 
4) Execution of the following commands. 


ANGLE, BEEP, CLEAR, CLS, DIM, ERASE, PRINT, LPRINT, 
TRON, TROFF 


If the following operations are executed while a STOP command is in 
effect, execution cannot be resumed by CONT. 
(1) Execution of manual commands (EDIT, SAVE, LOAD, LIST, 
etc.) 
(2) Execution of PUT/GET. 
(3) When an error occurs. 


Gzay CONT 
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TRON/TROFF 


Traces program execution/terminates tracing of 
program execution. 


TRON 
TROFF 


TRON and TROFF commands are used during program debug. 


TRON ....... Specifies the trace mode. 
TROFF ces ax Releases the trace mode. 


When the trace mode is specified, a program is executed while the 
present program area number and the line number are displayed as 
follows. 


Display ? °110) 


Line number being executed 
Program area being executed 


Since TRON, TROFF are program commands, they can be used by 
writing them in a program, but they are usually used by direct entry. 


Input the following program and execute it. 


PO 

10 BEEP 1 

20 GOTO PROG 1 
P1 

10 BEEP @ 


20 GOTO PROG @ 
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When you run this program, two beeps start sounding alternately. Press 
the key and then enter TRON (@] to specify the trace mode. Now, 
run the program. The program area and line number being executed are 
continuously displayed as shown below. 


(0: 20) 


(1 : 20) 
(O : 20) 


You will notice that the interval between the BEEP sounds is rather long 
in trace mode. This is because execution is much slower in this mode. 

In addition, during INPUT statement execution, it stops by displaying 
2” after the [area number, line number]. And, the result is displayed 
during PRINT statement execution. This command is very convenient 
during debug because the program execution process can be traced. 


213 


4-3. NUMERICAL FUNCTIONS 


awit. | Gives the sine of X (Sin X). 
SIN numerical expression 
—5400° < Numerical expression < 5400° 


The SIN function is used to compute Sin X. 
Any one of 3 angle units (DEG, RAD, GRA) can be selected. 
When the power is turned on, the angle unit is set to DEG (degree). 


SIN X computation is performed using DEG (degree). 
5 ANGLE @ 
1@ PRINT SIN3@ 
20 PRINT SIN45 
3@ PRINT SINSO@ 
50 END 
When you run this program ( ®@@® f&) ), the results for SIN 30, SIN 


45 and SIN9@ flow across the display and disappear. 
Run this program again after adding the following line. 


25 STOP 
Now the results for SIN30 and SIN45 are displayed and stopped. 
Execution Example @. 5 


@.7071067812 


STOP PO-25 


To continue, enter either CONT & or J] , and the next result 
(SIN9Q) will be displayed. (See page 131.) 


Execution Example 4 


Ready PO 
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The following program allows you to select one of the angle units (DEG, 
RAD, GRA) and compute SIN X. 


10 REM SIN X EXAMPLE 

2Q@ INPUT "“ANGLE=";K 

3@ ANGLE K 

40 INPUT "SIN X: x="; 

0@ PRINT "SIN"; X3"="3SINX 
6@ STOP 

7@ END 


When you run this program, the angle unit is requested first as follows. 
ANGLE =? 
Next you should specify the angle unit as follows. 


ANGLE 0 > DEGREE 
ANGLE 1 > RADIAN 
ANGLE 2 > GRAD 


RADIAN is selected as an example. 
Enter 1. 


SINX X=? is now requested. 


Next, when you input the Radian angle, such as PI/4, the display result is 
as follows. 


Execution Example 


SIN 0. 7853981634=0., 
7071067812 


STOP PO-60 
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The angle unit is modified using the ANGLE command as described, and 
the input range for each angle unit is as follows. 


DEG -—5400° < Numerical expression < 5400° 
RAD —30a < Numerical expression < 30 7 
GRA -6000 < Numerical expression < 6000 


When the value of a numerical expression is outside the ranges shown 
above, an error (BS error) occurs. 

A variable and a numerical expression, as well as a real number (such as 
30), can be used for the argument. 

When only one real number or variable is used, it makes no difference 
whether or not the argument is placed inside parentheses. However, 
when a numerical expression is used, the result will differ depending on 
whether or not it is placed inside parentheses as follows. 


SIN X+Y..... Add Y to the result of the SIN X computation. 
SIN (X + Y) .... Compute the SIN of the result of X + Y. 


Gay =ANGLE, COS, TAN 


Memorandum 


There are three different ways to express the angle of a trigonometric 
function: ‘Degree (DEG)”’, “Radian (RAD)” and “Grad (GRA).” 


1° is 1/360 of the circumference of a circle. 
1 rad. is 1/2a of the circumference of a circle. 
1 grad is 1/400 of the circumference of a circle. 


Degree and radian are mainly used, and they have the following relation- 
ship. 
1° =x /180rad = 3.141592654180 rad 
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COS 
Fain [ Gratiecnine oN 


COS numerical expression 
—5400° < Numerical expression < 5400° 


The COS function is used to compute COS X. 
The angle units, X argument input range, and precision for COS X are 
exactly the same as for SIN X. 


Provide input to a program in which COS X is used. 


1@ REM COS x EXAMPLE 

2@ INPUT “ANGLE=";K 

3@ ANGLE K 

4@ INPUT "COS X:X="3;%x 

5@ PRINT "COS";%X3"="3COSX 
68 STOP 

7@ END 


When you run this program, angle unit input is requested by 
ANGLE =? 


Next, if the grad angle unit is to be used, input “2’’. After this, since the 
angle is requested as follows, provide an input of 1355. 


COSX X=? 
The result will be —0.7604059656. 


Gay” SIN, ANGLE, TAN 


217 


CHAPTER 4 COMMAND REFERENCE 


TAN 
a ea. 


TAN numerical expression 


—5400° < Numerical expression < 5400° 
Except |numerical expression] = (2m — 1) x 1 right angle 
(n = integer) 


The TAN function is used to compute TAN X. 
The angle units are the same as for SIN X and COS X. 


A program to obtain TAN X. 


I@ REM TAN X EXAMPLE 

2@ INPUT "ANGLE="3K 

3@ ANGLE K 

4@ INPUT "TAN X: X="; X 

o@ PRINT "TAN"; X3 "="3 TANX 
60 SOF 

7@ END 


When you obtain TAN 45 using the DEG angle unit (ANGLE Q), the 
result is displayed as 


TAN 45 = 1. 


Next, if you try to obtain TAN 90, an ‘MA error” is displayed. 

When the TAN function is used, the value of TAN X suddenly increases 
as it approaches 90°. 

At TAN 90, the value becomes infinite and computation cannot be 
performed. 

As a result, an “MA error” was displayed in the above example. When 
the value of X is +9@ *(2n—1) (n is an integer) in TAN X, precautions 
should be taken since an error occurs as mentioned above. 


Gay SIN, COS, ANGLE 
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ASN gives the arcsine (Sin™! X). 
ACS gives the arccosine (Cos! X). 
ATN gives arctangent (Tan™! X). 


IXI< 1 (ASNX, ACS X) 
ASN X, ACS X, ATN X. XI < 10! (ATN X) 


The ASN, ACS and ATN functions are used to compute the inverse 
trigonometric functions: SIN~! X,COS~! X and TAN“! X., 

The trigonometric functions (SIN, COS, TAN) are used to obtain the 
trigonometric function values of given angles. On the other hand, the 
inverse trigonometric functions obtain angles when trigonometric func- 
tion values are given. 


A program example which uses ASN X is shown below. 


10 REM ASN X EXAMPLE 

2@ INPUT "“ANGLE="3K 

3@ ANGLE K 

4@ INPUT "ASN X: X="3X 

5@ PRINT "ASN"; X%3 "="3ASNX 
6@ STOP 

7@ END 


When you run this program, the following two input requests are dis- 
played. 


ANGLE =? 0 @)...... Specifies ‘‘degree.”’ 
ASNX X=? 1 @...... Inputs the trigonometric func- 
tion value. 
When you input these values, the following is displayed. 
ASN 1 = 90 


In other words, the angle X of SIN X = 1 was obtained. 
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Try this program again using ACS and ATN to replace ASN. 

These inverse trigonometric functions are specified by ANGLE the 
same as for SIN, COS, and TAN. 

The degree (DEG) angle range in the computation result is as follows. 


—90° S ASN £ 90° 
0° SACS © 180° 
—90° SATN $90° 
Since SIN X and COS X do not theoretically exceed 1, the value of 
argument X of ASN X and ACS X must not exceed 1. 


Gay” SIN, COS, TAN, ANGLE 
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HYPSIN/HYPCOS/HYPTAN 
[Function | Ghe te hypetboiefunaiong 


HYPSIN numerical expression 


HYPCOS numerical expression 
—1Q1°° < Numerical expression< 230.2585092 


HYPTAN numerical expression 
INumerical expression| < 10! 


This series of functions expresses the hyperbolic functions. Each respec- 
tive numerical expression is as follows. 


HYP SIN : sinhx =(e%-—e~*)/ 2 
HYP COS : coshx =(e%+e™%*)/ 2 
HYP TAN : tanhx =(e*—e™*)/ (e*+e7”) 
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HYPASN/HYPACS/HYPATN 
[Faneton | Ge hehyperbotctineions 


HYPASN numerical expression 
HYPACS numerical expression 


[Numerical expression| <5 x 10% 


HYPATN numerical expression 
INumerical expression| < 1 


This series of functions expresses the inverse hyperbolic functions. Each 
respective numerical expression is as follows. 


HYP ASN : sinh'!x = log (x+/x?+1 ) 
HYP ACS : cosh'!x = log (x+/x*—1) 
HYP ATN : tanh?x = dlogs+* 


1—x 
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| Function — Gives the square root of the argument. 


SQR numerical expression 
Numerical expression 2 
The SQR function is used to obtain a square root as follows. 


SOR X =X“0.5=V X 
In this case, the value of X must be larger than 0. 


The following program is used to input the area of a circle in order to 
obtain the radius. 


{@ REM SQ@R xX EXAMPLE 

2@ INPUT “CIRCLE AREA="55S 
3@ R=SARCS/PI) 

4@ PRINT "CIRCLE RADIUS=";R 
5@ LOCATE @;2 

6@ END 


When you execute this program, the following is requested. 
CIRCLE AREA =? 


Enter 10@ as an example. Then 5.641895835 is displayed for the value 
of the radius. 

If you run this program again and enter a minus value, an MA error 
will immediately be displayed because SQR (S/Pi) becomes an imaginary 
number when the argument (X) of SQR X is a minus value. To avoid this 
error, it is recommended that the following line be added to check for a 
positive or negative argument. 


35 IF S<@ THEN 20 
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LOG, LGT 


Gives the value of natural logarithm loge X. 
Gives the value of common logarithm 
log. 9 X 


LOG numerical expression N aa boas 
LGT numerical expression umerical expression 


LOG X computes the value of natural logarithm loge X (InX). In this 
case, “‘e’’ is the base of a natural logarithm. 
The value of @ is as follows. 


é€ = 2.718281828...... 


LGT X computes the value of common logarithm, log;9 X. The base of 
a common logarithm is 10. 


The following program computes LOG X for successive given values 
of X. 


1@ REM LOG X EXAMPLE 

2@ INPUT "“X="3%X 

3@ PRINT "LOG"; X;"=";LOGX 
4@ GOTO 20 


When you execute this program, 
X=? 
is displayed which requests the value of X for LOG X. 
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If you enter ‘‘1”, the value of LOG X is displayed as LOG (1) =@, and 
the next value of X is requested. 
Execution Example 


CLS 


RUN @] 
12) 


The logarithmic function LOG X has an inverse relationship with 
the exponential function EXP X as shown in the following graph. 


X > 0 is required in a logarithmic function as shown in the above 
graph. 

If a negative value is entered, an MA error is displayed. 

While LOG X is the logarithm of X (which has a base of e), the 
logarithm log, X (which has a base other than e), can be computed 
by the following formula. 


LOG X/LOG Y 


Therefore the common logarithm of X, LGT X can also be obtained 
with the following formula. 


LOG X/LOG 10 
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SAMPLE PROGRAM 


* This program allows many different logarithmic values to be obtained 
when base values are entered. 


1 
20 
30 
40 


a) 2) 
6G 
7O 


REM xk LOG X/”LOG Y xx 
INPUT "X="3X 
INPUT "Y="3¥ 


PRINT "COG"3-x3s" 7l0G" s-¥s""="> LOGX7LO 
GY 

LOCATE 033 

STOP 

END 


This program computes the value of logy X with the formula, LOG X/ 


LOG Y. 


An execution example is provided below. 


Execution Example 


RUN @] LOG 10/LOG 2= 3.3219 
10 @) 28095 
a) STOP PO-6Q 


Gay EXP 
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EXP 


[Function — Gives the exponential function ex. 
EXP numerical expression 
—10'°9 < Numerical expression < 230.2585092 


The EXP function is used to compute the value (e) of an exponential 
function. The value of ‘‘e’’, which is the base of an exponential function, 
is as follows. 


e = 2./18281828..... 


The expression ‘‘exponential increase” is often heard in conversation. 
The nature of this function is that the value of EXP X suddenly increases 
as the value of argument X increases. 


Enter the following program to observe the change in the value of EXP 


1@ REM XX EXP X Xx 

2@ INPUT "A="5A 

3@ FOR X=1 TO A 

4@ PRINT "EXP"; X%3 "="; EXPX 
5@ FOR I=1 TO 3@0:NEXT I 
6@ NEXT X 

7@ END 


When you execute this program, a request is made for the maximum 
argument value X of EXP X. 


A=? 


Enter “‘1@” as an example and press the 2) key. The results shown on 
the following page are displayed in series. 
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Execution Example 


EXP 1= 2.718281828 
EXP 2= 7.389056099 
EXP 3= 20.08553692 
EXP 4= 54.59815803 
EXP 5= 148.4131591 
EXP 6= 4@3.4287935 
EXP 72= 1096.633158 
EXP 8= 2980.9573987 
EXP 9= 8103. 083928 
EXP 1@= 22026.46579 


You will see that the value of EXP X increases suddenly. 

Run this program again entering ‘‘231” for A. 

The values of EXP X are displayed in series, and, when the value of 
the argument is 231, an MA error occurs. 

The input range of the argument X of EXP X is actually 


X < 230.2585. 
The value of EXP X with X = 230.2585 is as follows. 


Execution Example 


EXP 230. 2585= 9.9999070@6E993 


227 


CHAPTER 4 COMMAND REFERENCE 


Gives the absolute value of the argument. 


[Format ABS numerical expression 


ABS X gives the absolute value of X which is mathematically expressed 
as follows. 


ABS X = |X| 
In regard to the X of ABS X, 
When X 2 O (value X is positive)... ........ 0.002 ee eee ABS X = X, 
and when X < 0 (value X is negative) ................. ABS X = —X. 


In other words, ABS X computes in a way that allows the result to be- 
come a positive number (absolute number). 


Now let’s look at a program which uses the ABS function. 


1@ REM ABS X EXAMPLE 

2@ READ A;B;C;D 

3@ X=A:GOSUB 4@: X=B:GOSUB 4@: X=C: GOSU 
B 40: X=D:GOSUB 4@: END 

40 PRINT "ABS"; X; "="; ABSX 

90 FOR I=1 TO 200:NEXT 1 

6@ RETURN 

7Q@ DATAS: -5:0),-7.5 


This program reads 5, —5, @ and —/.5 into variables A, B, C and D 
respectively using a READ statement and computes ABS A to ABS D. 
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The result is displayed as follows. 


Execution Example 


ABS 5=5 
ABS -5=5 
ABS @=0 
ABS -7,.5=7.5 


An operation the same as the ABS function can be performed using the 
SGN function. 


ABS X isthe same as X * SGN X 


SAMPLE PROGRAM 


* A program in which no error occurs when a negative value is entered. 


1Q@ INPUT Xx 

20 S=SQRCABSX) 

3@ L=LOGCABSX) 

40 PRINT "SQRX="3S 

0@ FOR I=1 TO 20@:NEXT I 
6@ PRINT "LOGX="35L 

7@ END 


When argument X is a negative value for functions such as SQR X and 
LOG X, an MA error occurs. 
Therefore, in this program, calculation is performed using the absolute 


value of X. 


Gay SGN 
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INT 


Gives the largest integer which does not exceed the 
argument value. 


| INT numerical expression 


INT X gives the largest integer that does not exceed the value of X. 
For example, when the values of X are 3.9, 0.5, —O.5 and —3.9, INT X 
is as follows for each of these values. 


INT 3.9=3 

INT 0.5=0 

INT —0.5 = —1 

INT —3.9 = —4 
When the value of the argument is positive, the value after the decimal 
point is discarded. However, care should be exercised when the argument 
is negative. For example, if the argument is —0.5, the integer is not 0 but 
—1 which is the largest integer that does not exceed —0.5. 


Let’s try the following program. 


1@ REM INTX EXAMPLE 

20 READ A;B3C 

38 X=A:GOSUB 40: X=B:GOSUB 40: X=C: GOSU 
B 4@: END 

40 PRINT "INT"; X%3 "="3 INTX 

50 FOR I=1 TO 200:NEXT I 

60 RETURN 

70 DATAS.33;0.5;-3.9 


Execution Example 


[INT -3.35-5 
INT 8.5= @ 
INT -3.9=-4 
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When you run this program, the results shown on the previous page are 
displayed. 

An INT function graph is drawn as follows by placing values of X hori- 
zontally and values of INT X vertically. 


INT X Graph 
INT X 
4 
3 - 
2 eae = INT X provides ‘’2’ for all X 
~ which are located within this 
= range. 


=3. S2 = I 2 3 


o—0-— 2 © : Not included 
e: Included 


The difference for positive or negative values can be found using this 


graph. 
The INT function is often used by combining it with other functions 
such as the RND function. In addition, the FRAC function, ROUND 


function, etc. are similar to the INT function. 


SAMPLE PROGRAM 


* A program which displays 5 integers between Q and 9 at random. 


10 FOR I[=1 TO 5 

20 PRINT INTC1@XRNDO; 
3@ NEXT I 

4@ END 


This program was prepared by combining the INT function with the 
RND function as an example. 


Gy” FRAC, ROUND, RND 
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[Function Gives the value of the fractional part of the argument. 


Format FRAC numerical expression 


FRAC X gives the value of the fractional part of X. 
Simple examples are provided as follows. 


FRAC 1.123 = 0.123 
FRAC —1.123 = —0.123 


Simply stated, this function discards the integer part as shown above. 


Try the following program by entering many different values. 


1@ REM FRAT X EXAMPLE 
2@ INPUT "NUMBER"; X 
3@ PRINT FRACX 

42 GOTO 10 


SAMPLE PROGRAM 


* This program generates a 9-decimal place random number and then 
fetches the digits one by one to convert them into single-digit integers. 


10 DIN YC9) 

2@ X=RND 

3@ FOR I=1 TO 9 

4@ YCIJ=INTC1I1GXX) 

5@ PRINT "X="; 

6@ PRINT "YcC"3 Is "d="s YC) 
7@ FOR J=1 TO 15@:NEXT J 
8@ X=FRACC 10xkxX) 

3@ NEXT I 
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This program assigns a value generated by the RND function to variable 
X 


The value is multiplied by 10 and then the INT function is used to 
obtain a single-digit integer. The integer is assigned to array variable 
Y(1) and then the remaining decimal portion is fetched using the FRAC 
function and assigned to X. Then the process begins again. This is re- 


peated 9 times and results in 9 single-digit integers assigned to array 
variables Y(1) to Y(9). 


Q,.B9288Q2520 


¥(4). ¥(2) ¥(3) 4) Y(6) Ye) Y(7)" ¥(8)" Y(9) 


\. ae ~~ 


Gay” = INT, RND, ROUND 
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Function Gives a value according to the sign of argument. 


Format SGN numerical expression 


The SGN X function judges whether the value of argument X is positive 
or negative. SGN X provides three different results as follows. 


X>O (If positive) ............ SGN X= 1 
M= OO) shod a wcctiws SGN X=0 
X <0 (If negative) ............ SGN X = — 


Try the following program. 


1T@ REM SGN X EXAMPLE 

2@ PRINT “JUDGEMENT OF + OR -" 

3@ INPUT "NUMBER"; X 

4@ A=SGNX 

5@ IF A=1 THEN PRINT "+":GOTO 30 
6@ IF A=@ THEN PRINT "“@": GOTO 30 
7@ IF A=-1 THEN PRINT "-": GOTO 38 


In lines 5@ to 70, if the input value is positive, a ‘‘+’’ is displayed, if it is 
negative, a ‘‘“—”’ is displayed, and if it is @, a “@”’ is displayed based on the 
value obtained by SGN X. 
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SAMPLE PROGRAM 


* A program which provides a sine curve. 


1@ CLS :FOR X=@ TO 54@ STEP 20 
20 S=SGN¢(SINX) 

3Q@ Y=SXINTCSK1@xXSINX) 

4@ IF S<@ THEN 7@ 

5@ DRAWCX%74;5 16-Y) 

68 GOTO 8@ 

7QO DRAWCX745 16+Y) 

8@ NEXT X 

3@ END 


This program produces SIN X for X=@ to 54° at 20° increments. These 
values are multiplied by 10 to produce single-digit values which are 
assigned to Y. 

At this time the SGN function is taken for SIN X, and, even if SIN X 
produces a negative number, the INT function obtains the integer por- 
tion only. 

In this way, X and Y values are plotted by the DRAW command centered 
around coordinates (0, 16) — (159, 16). If a value is positive, (X/4, 16—Y) 
is plotted, while, if a value is negative, (X/4, 16+Y) is plotted. (See 
DRAW.) 

When this program is executed, a rough sine curve is plotted as shown 
below. 


Execution Result 
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ROUND 


Gives the value of numerical expression 1 which is 
rounded at a position specified by numerical expression 2. 


ROUND (numerical expression 1, numerical expression 2) 
Numerical expression 2: Digit position 


ROUND (X, Y) gives the value of X which is rounded at the 10 posi- 
tion as follows. 


ROUND (12345, 2) = 12000 


The numerical value 12345 is rounded at the 10? position which is the 
100 position. 


You can confirm the operation of the ROUND function with the fol- 
lowing program. 


1@ FOR Y=3 TO -5S STEP -1 

20 X=12345.67891 

3@ Z2=ROUNDCX; Y) 

4Q@ PRINT USING" #####. #####"> X52: PRINT 
5@ FOR J=@ TO 15@:NEXT J 

60 NEXT Y 

7@ END 


This program performs a calculation in which the value Y of ROUND 
(X, Y) is continually decreased by 1 from 3 to —5. 
The value specified for the 2nd argument Y is 
lY!< 100 
If it exceeds this range, a BS error occurs. 


When a value with a fraction is specified for the value of Y, the fractional 
part is discarded. 
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Execution Example 12345.678391 
10000. 00080 
12345.67891 
12000. GBWB0 
12345.67891 
12300. BQ@000 
12345. 67291 
12350. 00202 
12345.67891 


SAMPLE PROGRAM 


* This program displays binary 8-bit random numbers and their decimal 
values. 


18 Y= 

20 FOR I=7 TO @ STEP -1 
3@ X=ROUNDCRND; -1? 

48 Y=Y+(2°1)X 

5Q PRINT X; 

6@ NEXT I 

7@ PRINT "="3¥ 

8@ LOCATE @51 

90 FOR J=@ TO 5@@:NEXT J 
1@@ END 


Since random numbers generated by the RND function (page 239) are 
rounded to one decimal place in line 3@, the value of X is @ or 1. 

The value of X is generated 8 times to provide an 8-bit random number 
that consists of Os and ls. 

At the same time, the binary 8-bit value is converted to a decimal num- 
ber in line 40 which is continuously displayed. An execution example 
is provided below. 


RUN @) RUN 


00101001 =41 
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Gives the ratio of the circumference of a circle to its 
diameter (7). 


Pl gives approximations of the ratio of the circumference of a circle to 
its diameter (7). 
The value provided for 7 is as follows 


mw = 3.141592654...... 


The following program computes the area of a circle. 


10 REM PI EXAMPLE 

20 PRINT "CIRCLE AREA" 
3@ INPUT "RADIUS":R 
4Q@ S=PIXR*2 

5@ PRINT "S="3S 

6@ END 


If you enter 5 as the radius value, the area of the circle is displayed as 
follows. 


Execution example 


S= 78.53981634 


238 


4-3, NUMERICAL FUNCTIONS 


Function Gives a random number value. 


Format RND 0 < Random number < 1 


The RND function gives a 10 digit pseudo random number value that is 
larger than @ and smaller than 1. 

Random numbers were first required for the simulation of statistical 
phenomena or probability models, and are now used for simulations 
such as economic forecasts or TV games. In particular, the fun provided 
by TV games is largely due to this random number function. 


The following program generates 10 random numbers. 


10 FOR N=1 TO 1@ 

26 PRINT RND 

36 FOR X=1 TO SO@:NEXT X 
40 NEXT N 

90 END 


These results are only examples. Of course, each time you run this pro- 
gram, different random numbers will be generated. 


@.6791506196 
sdO08Z3Z115 
. 28057199883 
. 5839057551 
- 306977169 

. 1865778556 
- 417707547 1 
-9817414683 
» 75913551958 
- 4560918328 


OOOO ODD OD ® 
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Since a large number of digits are generated, they are not easy to handle 
as they are. Therefore, when used for games, etc., random number values 
within an appropriate range are obtained by combining this function 
with the INT function and ROUND function as follows. 

(1) Produce integers up to a desired digit. 


INT (RND *10“L)..... L indicates the number of digits. 
(2) Produce integers from N to the upper limit M. 


ROUND (RND * (M—N), —1) +N ....N and M are integers. (N<M) 
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| Function Converts sexagesimal to decimal. 


| Format DEG (degrees [ , minutes [ , seconds] | ) 


The DEG function converts a sexagesimal value to a decimal value. The 
degrees, minutes and seconds of a sexagesimal value have the following 
relationship with a decimal value. 


DEG (deg., min., sec.) = deg. + min./60 + sec./3600 
Input must be within the following range. 
IDEG (deg., min., sec.) | < 101° 


Input sexagesimal values into the following program to confirm opera- 
tion of the DEG function. 


1@ REM DEG EXAMPLE 


2@ INPUT "DEG.= "3A 
3@ INPUT "NIN.= "3B 
40 INPUT "SEC.= "3C 


5@ D=DEGCA;B3;C) 

68 PRINT “DEGC"3A3 "3 "3B3 "59 "3C3 "9" 
7@ PRINT "="3D 

886 GOTO 20 


Gay ~DMs$ 
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PEEK 


Gives the memory contents at a specified address. 


address 
PEEK. (—= 
numerical expression 


The PEEK function produces the value stored in specified fraction 
address. The range of the addresses is given below. Any values included 
in the address are discarded. 


—32769 < address < 65536 


See CLEAR for information on addresses. 
The following program displays the contents of an input address. 


1@ REM PEEK EXAMPLE 

20 INPUT "Address = "3A 
3@ B=PEEKCAD 

4@ PRINT B 

5@ GOTO 2a 


gay” CLEAR, POKE 
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ASC 


Gives the decimal code for the first character of a 
character string. 


ASC “Character string” 
ASC (Character variable) 


All characters, numerals, and symbols displayed by the PB-770 have a 
number which is called ASCII code (character code). 
Examples are as follows. 


OI. Shs. “OS 
“By 66 (See page 327, CHARACTER CODE TABLE.) 
1) atte aes 54 


These character numbers (codes) can be directly determined by the 
PB-770 using the ASC function, and can also be determined using the 
CHARACTER CODE TABLE. 


Enter PRINT ASC ("E") @] 


69 is displayed as the 
ASCII code value of ‘‘E’’. 


When an entry is made to determine two character codes or more such 
as 


PRINT ASC ("EF") @] 


only the character code for “‘E”’, the initial character, is displayed. 
Therefore, to determine the codes for a long character string (such as 
“ABCDEF ....”’) serially from the beginning, use a program that 
includes the MID$ function (see MID$). 


SAMPLE PROGRAM 


* A program that displays character codes of input characters. 


1@ REM ASCII CODE 

2@ CLS 

3@ INPUT "WHICH CHARACTER"; A$ 
4@ PRINT ASCCAS) 

98 GOTO 30 
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When character input is performed in line 3@, the code is displayed 
in line 40. Since execution returns from line 5@ to line 3, character 
input can be continuously performed to determine codes. 


The execution result is as follows. 


Execution Example 


WHICH CHARACTER’ A 
65 

WHICH CHARACTER’ T 
84 

WHICH CHARACTER’ R 
82 

WHICH CHARACTER? 7 
55 

WHICH CHARACTER® 1 
49 


Since this program indefinitely requests character codes, press the 
key to stop execution. 


Gay = CHR$ 
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CHRS 


Function Gives the character represented by a specified ASCII 
code. 


Format CHR$ (Code) 0 S Code < 256 


The CHR$ function is used to produce the character, number, or symbol 
that corresponds to a specified ASCII code. 


Enter PRINT CHR$ (66) 2] 
The character “B”’ is displayed for ASCII code 66. 
To determine two characters at one time, enter 
PRINT CHR$ (71); CHR$ (80) =] 


The characters ‘'G”’ and “P”’ which correspond to ASCII codes 71 and 
80 are displayed. 

Characters that can be entered on the PB-770 by direct key input are 
numerals, capital alphabetic characters, small alphabetic characters, and 
some symbols. Other characters (such as graphic characters) are display- 
ed using CHR$ (see page 327, CHARACTER CODE TABLE). Numbers 
(codes) that can be specified by CHR$ are within a range of ®@ < Code < 
256, and the fractional part is ignored. 


5 V=0 

10 FOR 1=33 TO 254 
20 PRINT I 

30 V=U+1 

40 FOR J=1 TO 14 
5@ PRINT CHR$CI1); 
60 NEXT J 

70 PRINT 

8@ IF U<3 THEN 110 
9@ K$=INKEY$: IF K$="" THEN 9@ 
100 VU=0 
110 NEXT I 
12@ END 
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* This program displays the characters for character codes 33 to 254. 


When this program is executed, the characters corresponding to ASCII 
codes 33 to 35 are displayed by lines 14 characters long, and then the 
characters corresponding to the next three sequential ASCII codes are 
displayed when any key is pressed. Execution continues until the 254th 
character. A display example is shown below. 


33 


$ @#@ # # ft € ff @© @© 8 $ #8 # 5 


34 
39 
HH HH HH Ht Ht HHH HH 
36 
SS$$SSSSS$SSSSSS 
37 
“AREER 
38 
G & & & G&G GG &&&& 


Gay ASC 
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| Function — Converts a character string into a numerical value. 


VAL “Character string” 
VAL (Character variable) 


VAL is a function that converts a character into a numerical value. 

The difference between a character and a numerical value must be 
explained in order to understand VAL. 

Compare the following two program examples. 


Program (1) Program (2) 

10 READ A>B 1@ READ A$;BS 
20 C=A+B 20 C$=A$+BS 
3@ PRINT C 30 PRINT C$ 
40 END 40 END 
5@ DATA3;5 5@ DATA3;5 


In program (1), the numerical data are read into the numerical variables 
A and B, and the arithmetic result is displayed by assigning it to C. 
The result of program execution is 

48 
In the above, _. indicates the space for the ‘+ ”’ sign which is always 
omitted. 
On the other hand, in Program (2), 3 and 5 are read into the character 
variables A$ and B$, respectively, as character data. 
With character variable operations, only addition can be performed. In 


this case, the result is assigned to C$. 
When this program is executed, 


35 
is displayed. The result is just the display of a character string. There is 
no ‘‘—”’ sign or blank for the “ + ”’ sign. 
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This blank is very significant, and the difference will be clarified by 
comparing the Program (3) and (4) execution examples which follow. 


Program (3) 


10 FOR I=1 TO 10 

20 READ A 

30 PRINT A; 

4@ NEXT I 

59@ END 

60 DATA3; 8»-6)7521 
70 DATA223; 18583150 


Execution Example 3 8-6 7 21 223 18 8 
1 @ 


Program (4) 


10 FOR I=1 TO 10 

20 READ AS 

3@ PRINT A$; 

40 NEXT I 

5@ END 

60 DATA3>;8;-6)7521 
70 DATAZ23;18;8;150 


Execution Example 38-672122318810 


The VAL function is used to perform calculation as in Program (1) above 
using the numerals read in character variables A$ and B$ as in Program 


(2). 
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10 READ A$;>BS$ 

20 C=VAL CAS) +UAL CBS) 
30 PRINT C 

40 END 

9@ DATA3:5 


When the program is executed, ‘‘_.8”’ is displayed as for Program (1). 
The following precautions should be taken when the VAL function is 
used. 

(1) When a character other than a numerical value, decimal point, sign 
(+, —) or exponent sign ‘‘E” appear in the character string, everything 
following that character is ignored. (Second and subsequent appear- 
ances of the exponent sign ‘“‘E”’ are ignored.) 

2 The first space in a character string is disregarded. 

3) When the initial character of a string is not a numerical value, decimal 
point, or a sign, or when a character string is only a sign or a decimal 
point, @ (zero) is provided. 

(4) When more than three numerals exist after an exponent sign ‘‘E”’, 
an SN error occurs. 


SAMPLE PROGRAM 


* An input subroutine where no error occurs when any key is pressed 
as a response to the input request of Menu Nos. 1 to 5. 


100 2$=INKEY$: IF 2$="" THEN 100 
110 IF 2$<"1" THEN 100 
120 IF 2$>"5" THEN 100 
13@ GOSUB VAL¢2$)x1000 
5 


In this program, when a key from 1 to 5 is pressed, the program jumps 
to the corresponding subroutine at lines 100@ to 5000, and when a key 
other than one of these is pressed, re-input is requested. This subroutine 
is convenient to use as an input routine for job selection. 


Gay Ss STR$ 
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| Function Converts a numerical value into a character string. 


Format STR$ (Numerical expression) 


The STR$ function converts a numerical value into a character string. 


What are the execution results of Programs (1) and (2)? 


Program (1) Program (2) 
1@ A=25: B=3@ 1@ A=25: B=30 
2@ C$=STR$CA+B) 2@ C$=STR$CAI+STR$(B)D 
3@ PRINT C$ 30 PRINT C$ 
4@ END 4@ END 


Although these two programs seem to be identical, “55”’ is displayed in 
Program (1) and ‘'25 3” is displayed in Program (2). 

In Program (1), the result of the numerical expression A+B is converted 
into a character by the STR$ function. In Program (2), the contents of 
numerical variables A and B are converted into their respective characters 
and are then added. This difference appears in the execution result. 


SAMPLE PROGRAM 


* Addition practice program. 


10 REM ADDITION 

20 FOR I=1 TO 5 

3@ X=INTCRNDX100) 

40 Y=INTCRNOX100) 

90 2=X+VY 

6@ PRINT STRS$CXK)e"+"sSRIGHTSCSTRSCYIOL 
ENCSTRS$CY))-1);3 

7QO INPUT "="3A 
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80 IF A=Z2 THEN PRINT "OK" ELSE 60 
90 NEXT I 
100 END 


(See RIGHT$, LEN.) 


This program produces five addition problems. The operator supplies the 
answer for the addition of two integers up to two digits long. The pair of 
numbers used cannot be predicted because the RND function is used. 


The STR$ function is used in line 60 where the problem is displayed. 
Although 
60 PRINT X; "+"; Y; 


seems to be reasonable without using STR$, a blank for the + sign occurs 
before the numerical value as follows. 


_315+.30 = ? 
This is a good example of the utility of the STR$ function. 


The VAL function is the reverse of the STR$ function. 
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LEFTS 


Fetches a specified number of characters from the 
left of a character string. 


LEFTS$ (Character variable, numerical expression) 


Feat LEFTS$ (‘‘Character string”’, numerical expression) 


LEFT$ is a function that fetches a specified number of characters from 


the left of a character string. 


4@ ABS=“LEFT RIGHT”... 
2Q@ BS=LEFTS (AB$,4) 
30 PRINT BS 


When this program is executed, LEFT 


It should be noted that since the 
assigned character string is more 
than 6 characters, a registered 
variable is used (assigned up to 
16 characters.). 


is displayed. In other words, four 


characters from the left of the character string in AB$ are fetched. 
When @ is specified as the number of characters to be fetched, a null is 
provided, and, when the number of characters specified exceeds the total 
length of the string, all characters in the string are fetched. However, if 
the number of characters specified exceeds 255, a BS error occurs. 
The number of characters to be fetched can be specified by a variable or 


numerical expression. 


SAMPLE PROGRAM 


* A program which serially increases the character string display. 


10 ABS="READ LEFT" 
2@ N=LENCABS > 

30 FOR I=1 TON 

40 BCS=LEFTSCABS; I) 
9@ PRINT BC$ 

60 NEXT I 

7@ END 


Gay” RIGHTS 
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Execution Example 


R 

RE 

REA 

READ 

READ 

READ L 
READ LE 
READ LEF 
READ LEFT 
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RIGHTS 


Fetches a specified number of characters from the 
right of a character string. 


RIGHT$ (‘‘Character string”, numerical expression) 
RIGHT$ (Character variable, numerical expression) 


RIGHT$ is a function that fetches a specified number of characters from 
the right of a character string. 


10 AB$ = “LEFT RIGHT” eceee It should be noted that since 

the character string is more 
20 BS=RIGHTS$(AB$,5) than 6 characters, a registered 
30 PRINT B$ variable is used. 


When the program is executed, RIGHT is displayed which indicates that 
five characters from the right of the character string in AB$ are fetched. 
When @ is specified for the number of characters to be fetched, a null is 
provided, and, when the number of characters is specified that exceeds 
the total length of the string, all characters in the string are fetched. 
However, if the number of characters specified exceeds 255, a BS error 
occurs. 

The number of characters to be fetched can be specified by a variable or 
numerical expression. 


SAMPLE PROGRAM 


* A program which inserts a character string in a character string. 


18 ABS="AM PM" 
2@ BC$="NOON" 
3Q@ CD$=LEFT$CABS; 2) 


Oe ee setey taney BEG Se 
98 CD$=CD$+tRIGHTS$CABS) 3) certed in the character 
66 PRINT CD$ string in AB$_ using 
7@ END LEFT$ and RIGHT$. 
Execution Result Gay + +LEFTS$ 

AM NOON PM 
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MIDS 


Fetches a specified number of characters to the 
right of a specified position within a character string. 


MID$ (‘Character string’’, numerical expression 1, 
numerical expression 2) 
MID$ (Character variable, numerical expression 1, 
numerical expression 2) 


MID$ is a function that fetches a specified number of characters to the 
right of a specified position within a character string. This function isa 
kind of combination of LEFT$ and RIGHT$. 


MID$ (A$ ,3,2) 


The above expression indicates that two characters should be fetched 
from A$. The two characters are the 3rd and 4th from the beginning of 
the character string in A$. 


10 CLEAR 

20 DIMAS(O)*20  — «eeee Up to 20 characters 
30 A$(0)=“LEFT_.CENTER._RIGHT” eae ah 2 
40 BS=MIDS(AS(O),6,6) (See Page 162.) 

50 PRINT BS 

60 END 


When this program is executed, a string consisting of 6 characters starting 
from the 6th character from the left of A$(Q) is fetched, and CENTER is 
displayed. 

The following precautions should be taken when the MID$ function is 
used. 

When MID$ (character expression, n, m) is entered: 

(1) Fractional parts of values of n and m are discarded. 

(2) When m is @ and there is no character to be fetched, a null is provided. 
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(3) When ‘‘,m” is omitted, all the characters starting with the nth digit 
are provided. 

(4) When m exceeds the remaining length of the original string, all charac- 
ters starting with the nth digit are provided. 

(5) When n is larger than the total length of the original string, a null is 
provided. 

Bi Variables and numerical expressions can be used for n and m. 

7) A BS error occurs when n and m are outside the range of 


1<n<256 and @<m< 256 


SAMPLE PROGRAM 


* A program which produces the frequency count of lower case 
alphabetical characters in a composition. 


c¢ ”» 


r 


1@ DIM A$COdX5O 

20 N=@ 

3@ INPUT "DATA=";A$CO) 

40 M=LENCA$(O)) 

9@ FOR I=1 TOM 

60 IF MID$CA$(@);1,1).="r" THEN N=N+1 
7@ NEXT I 

8@ PRINT N 

3@ END 


(a3 ”» 


In this program, a text entry is made, the number of lower case “ r 
alphabetical characters is counted and displayed. 
Up to 5@ characters (including spaces) can be entered in the text. 
For example, when the following statement is entered: 
Learning _,.to _, master __, your__,CASIO __, Personal __, Computer 


a check is made of each character to see if it is “ r’’, and the number of 
‘“r’’ characters is counted. When the text shown above is entered, ‘‘5”’ is 
displayed. Try this yourself. 


gay” LEFT$, RIGHTS 
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LEN 


Provides the length of a character string. 


LEN (‘‘Character string’) 
LEN (Character variable) 


LEN is a function that provides the length of a character string assigned 
to a character variable. 


When the following is entered, 
CLEAR &) 
PRINT LEN (A$) 2] 


“Q” is displayed. 
This is natural because variable A$ is emptied by the CLEAR command. 
If: 


AB$ = “CASIO __, COMPUTER” =] 
PRINT LEN (AB$) 3] 


is entered, ‘‘14”’ is displayed. 
The range of values provided by the LEN function is @ to 79. 


SAMPLE PROGRAM 


* A character string is displayed with right justification. 


1@ INPUT AB$ 

20 L=20-LENCABS) 

30 LOCATE L:3 

4Q@ PRINT ABS$;:LOCATE @5@ 
5@ END 


When character string input is performed in this program, the string is 
displayed with right justification up to the last column of the screen. 
Up to 16 characters can be entered for one line. 
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INKEYS 


Function Provides the entry of 1 character from the keyboard. 


The INKEY$ function is one type of input command that resembles 
INPUT, but its operation is slightly different. With the INKEY$ function, 
character data produced only by a single key operation can be input. If 
a key is not pressed, nothing (null) is input and execution proceeds to 
the next command. It is unnecessary to press the @] key to input data. 
The differences between INKEY$ and INPUT are shown below. 


Display during Nothing displayed. Input request message. (‘‘?”’ 
execution display can be eliminated.) 


Data input Key pressed during execution. | Data entered when His 
(No input without pressing pressed. 
key.) 


Kinds of data 1 character Digits or number of char- 
(All inputs treated as acters within the range of a 
characters.) variable such as numerical 

values, or characters. 


Execution of Immediate execution Suspended until ~] is 
next command | ( (@] is unnecessary.) pressed. 


Since INKEY$ treats key inputs as characters, it is generally used in the 
form of an assignment expression as follows. 


Character variable = INKEY$ 


100 A$=INKEYS 

110 IF AS=""THEN 100 
120 IF AS$="E"THEN END 
MAD). zotadansetvestatwssengeates 
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When the “E” key is pressed, the program is terminated. When other 
keys are pressed, execution jumps to the next command. If no key is 
pressed, execution endlessly loops between lines 100 and 119. 

INKEY$ reads all keys except the Gk) key, : and (F) keys. Pressing 
the or (cars) key together with another key produces the correspond- 
ing shift mode or capital mode for the pressed. However, one-key com- 
mand operation produces a null. 


SAMPLE PROGRAM 


* This is asubroutine which assigns a predetermined number of characters 
to a character variable. 


1@ REM INKEY$S EXAMPLE 
2G ABS="" 

3@ FOR I=1 TO 1@ 

40 K$=INKEYS 

5@ IF K$=""" THEN 42 
6@ IF K$="X" THEN 9G 
7@ ABS=ABSt+K$S 

8@ NEXT I 

39@ PRINT ABS 


The number of characters that can be assigned to a character variable is 
limited. 

If a character string is entered using an INPUT statement, exceeding the 
input range generates an ST error. However, in this program, when 10 
characters have been entered, no further input is accepted and the pro- 
gram moves to the next command (line 90). 

Also, to stop input at 1@ characters or less, input “ > ’’ to move execu- 
tion to the next line (line 90). 


Gay INPUT 
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Converts a decimal value to a sexagesimal value and 
expresses it as a character string. 
| Format — DMS$ (numerical expression) 


This function converts a decimal value to a sexagesimal value and ex- 
presses it as a character string. The range of the numerical expression is 
as follows. 


INumerical expression| << 1019 


Also, when |numerical expression| > 1E6, minutes and seconds are not 
displayed (the input value is converted as it is into a character string). 


SAMPLE PROGRAM 


In the following sample program, input various decimal values to see how 
they are converted. 


1@: (REM DHSS EXARNPEE 
2Q@ INPUT "“NUMBER= "3A 
380 PRINT “DNS$C"ZAs"O" 
4@ PRINT "= ";DMS$CAD 
598 GOTO 20 


Gay DEG 
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HEXS 


Converts a decimal value to a hexadecimal value and 
expresses it as a character string. 


} Format HEX$ (numerical expression) 


This function converts a decimal value to a hexadecimal value and ex- 
presses it as a character string. The numerical expression must be within 
the following range. Fractional values are discarded. 


—32769 < numerical expression < 65536 


The resulting character string is a 4-digit hexadecimal value. Negative 
numbers are expressed as two’s complements. 

When a number is 32768 or greater, 65536 is subtracted from it and the 
result is converted to a hexadecimal value. 


In the following program, input decimal values are converted to hexadeci- 
mal values and then displayed. Input some values to confirm proper 
operation. 


10 REM HEX$ EXAMPLE 

2@ INPUT "“NUMNBER= "3A 
30 PRINT "HEX$C"3SA3")"5 
4@ PRINT "= &H"3HEX$CAD 
5@ GOTO 20 


GF = &H 
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TAB 


Moves the cursor by specified number of digits to 
the right. 


TAB (Numerical expression) 
@ < Numerical expression < 80 


This function is used in PRINT and LPRINT statements to move the 
cursor to a designated position. 


10 FOR X=1 TO 5 
20 PRINT X; “*2:”"; 

3Q@ PRINT TAB(10);x*2 
40 NEXT X 


When you run this program, the display is as follows. 


A172: GK vw A 
A222: Wu ASG A indicates the space where the 
+ sign is omitted. 


a 


TAB(10) 


When TAB (10) is specified as mentioned above, the cursor is moved by 
10 display positions, and subsequent display begins after that. 

The range that can be specified by the TAB function is @ to 79 including 
variables and numerical expressions. 

Fractional values are discarded. 


SAMPLE PROGRAM 


* Displays a character which corresponds to an ASCII code at a desig- 
nated location. 
16 FOR I1=33 TO 254 
2@ PRINT "ASC" 
3@ PRINT TABC5);1; 
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4Q@ PRINT TABC13); "CHR"; 
5@ PRINT TABC19);CHRS$CI) 
6@ NEXT I 

7@ END 


When you run this program, the display will be as follows. 


L_____s 
TAB(5) 
Ss A §—_o 
TAB(13) 


TAB(19) 
When the ©) key is pressed, the next code and character are displayed at 
the same position. 


Display position 


1. Counting the head of the line as @, count 1 for each space moved 
to the right. 

2. When a tab position to the left of the present screen position is 
specified, the specified position is determined counting from 


the beginning of the next line. 

3. When a position exceeding the range of 1 screen line is specified, 
the specified position is determined counting from the begin- 
ning of the current line. 


NOTE: 
When TAB is used during the LPRINT command, the FA-10 or FA-11 
printer can execute a normal TAB function, but this is sometimes not 
true when using CENTRONICS printers connected through the FA-4 
interface. When the TAB function is executed, the following data is 
output to the printer. 

(1B), + (54) + (numerical expression value) + (@D)+ 


* ( )., represents a hexadecimal value. 


When TAB is not used with an exclusive printer, use the function code 
(Horizontal tab) for that printer. 


Gay —sUSSIING, PRINT, LPRINT, LOCATE 
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USING 
ain [Sensis 


[Format USING ‘Format character string’’; 


The USING function displays a numerical value or a character string in a 
PRINT or LPRINT statement in a certain specified format. 


When numerical values are displayed in several lines, sometimes digit 
or decimal point deviations occur. However they can be arranged pro- 
perly utilizing the USING statement as follows. 

10 A=18.5 

20 B=2.67 

30 C=135.78 

4Q@ PRINT USING "#H#HHH. HHH" GA 

5@ PRINT USING "###HHH. HHH" 1B 

6Q PRINT USING "###H##H#H. HHH" sC 

.70 END 


When you execute this program, the display can be easily read as follows. 


Wow 8. 500 


eHeivoeses: O7O 
eyeyl BOs. 7:80 


“tt” and ‘+ ” as used here are the format character string. 
USING can also be utilized for a character string display. The format 
character string is specified with &(s). 


10 ABS$= "CASIO. .COMPUTER" :B$= "!!" 
20 PRINT USING "&&&&&&&&&&&&RK&K" ; ABS; BS 
30 END 
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When you execute this program, the display will be as follows. 
CASIO_,COMPUTER.,_! ! 


The number of characters for the CASIO._,COMPUTER is 14, however 
since a 16 format character string is used, the two extra characters are 
displayed as blanks. 

as a USING statement is used, the following precautions should be 
taken. 


(1) Characters other than # , + , © and &cannot be used in a character 
string format. 

5 # ,°, “and & cannot be used together. 

3) Numerical format specification 


ee Numerical digit specification 
@ - aipewad Decimal point specification 
DNS Gimmes Exponent specification 


(a) # can be specified up to 13 digits before the decimal point 
and up to 9 digits after the decimal point, and altogether up to13 
digits. 


Hititit#h#etntittet. 9 


nS HEHEHE HHH 
HHH RH 
13 


b) The position of the minus sign should also be designated by jf. 
c) A is specified at the end of a format character string. 

(d) When the fractional portion exceeds the format, output is 
performed by rounding off the next digit of a specified digit. 
PRINT USING “###.###”; 12.3456 > 12.346 

(e) When the integral portion exceeds the format, % is placed at the 
beginning to allow output without following the format. 

PRINT USING “##.##”; 1234.56 > % __1234.56 
(f) Numerical value output is performed with right justification. 
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(4) & character string format specification 
(a) & can be written as much as desired. 
(b) If the number of & is smaller than the character string, output 
is performed from the beginning by the number of & positions. 


PRINT USING “&&&&”"; “ABCDEF’ > ABCD 
(c) Character string output is performed with left justification. 


(d) Spaces are provided when the number of & is larger than the 
character string. 


(5) One USING specification is only effective in one PRINT or LPRINT 
statement. 

iS} A USING specification is renewed by a new USING specification. 

7) A USING specification can be released by USING “’’;. 


SAMPLE PROGRAM 


* A program which outputs a person’s name, the height, and weight in a 
certain format to the printer. 


10@ REM USING EXAMPLE 

11@ CLEAR =DIM A$¢2);A!¢2)5B!¢2) 

126 FOR I=0 TO 2 

13Q@ INPUT "NAME “3; A$CI)D;s "HEIGHT (cm) " 
sA! CI) 

14@ INPUT "WEIGHT ¢«Ka) "sB!C¢I)D 

150 NEXT I 

16@ FOR I=0 TO 2 

170 LPRINT TABC2); USING "&&&& SS EEE EEEEE 
GES ASCIDS 

18@ LPRINT USING" ######";3 A! CIO; "cm"3B! 


CId3 "Ks" 
1930 NEXT I 
200 END 
Execution Example 
JOHN SMITH 190cm 85K9g 
BOB JONES 68cm 7K9 
MARY KING 165cm 53K9s 
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POINT 


Peet: | Checks whether a display dot is lit or not. 


POINT (X, Y) © £ X < 159 (Horizontal position) 


© Y S31 (Vertical position) 


A character or sign consists of small square dots on the display screen. 
For example, the character A is displayed as follows. 


Each point is called a dot. 
The entire display consists of 5120 dots. 


(0.0) X= 160 dots (159.0) 
Y = 32 dots 
(0.31) (159,31) 


By assuming that the horizontal direction is the X axis and that the 
vertical direction is the Y axis, a dot can be displayed using 


Coordinate (X, Y) 


The POINT function checks whether a dot (X, Y) is lit or not. 
When a dot is lit on the coordinate (X, Y), ‘‘1”’ is given and when it is 
turned off, ‘‘@”’ is given. 


10 X=0:Y=0 
20 A=POINT (X,Y) 
30 PRINT A 
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a | ”) 


When you execute this program, if the (0, 0) dot is lit, is displayed, 


and if it is turned off, ‘‘O”’ is displayed. 

The following precautions should be taken when the POINT function is 

used. 

(1) Values rounded at 1 decimal place are used for X and Y. 

(2) When X and -Y exceed the range of the coordinates, an error (BS 
error) occurs. 


SAMPLE PROGRAM 


* Laser gun program. 


100 CLS :AAS$="2499DBFFFFDB9924": BBS$=" 
VB8O8U8BOC1IE3E3F?" 

11Q@ X=INTCRNDX?) +7 

120 LOCATE X;@:PRINT $AA$;:LOCATE 1853 
>PRINT $BB$; 

130 N$=INKEYS 

14@ IF N$="" " THEN GOSUB 380 

150 LOCATE X;@:PRINT " °%; 

160 GOTO 1180 

300 DRAWC83; 24)9-(€8335 7) 

31@ A=POINT C8332) 

320 IF A=1 THEN LOCATE @;3:PRINT "BEE! 
eG BEE 

330 DRAWCC83; 249-€8337) 

348 FOR 1=8@ TO 3@:NEXT I 

350 CLS :RETURN 
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STAT 


| Function Allows input of statistical data. 


| Format STAT [x data value] [ , y data value] [; frequency] 


The STAT command is employed for the input of statistical data in the 

following manner. 

(1) STAT x 57” 
This format is for the input of single-variable data. The default value 
for ;n is 1. 

(2) STAT x ,y jn 
This format is for the input of paired-variable data. The default value 
for ;n is 1. If either the value for x or y is omitted, the value entered 
immediately before is used (repeat function). Both x and y values, 
however, cannot be omitted. 


See 3-18 “STATISTICAL FUNCTIONS”. 


Gay STAT CLEAR, STAT LIST 
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STAT CLEAR 


| Function Clears the registers used for statistical calculations. 


| Format STAT CLEAR 


This command clears the registers used for statistical calculations. With 
this command, the contents of CNT, SUMX, SUMY, SUMX2, SUMY2 
and SUMXY all become @. This command should always be used before 
beginning a new set of statistical calculations. 


Gay = STAT 


STAT LIST/STAT LLIST 
[Fancion [oopnserpinstaietais 


STAT LIST 
STAT LLIST 


(1) STAT LIST 
Displays data names and values for basic statistics in the order of 
CNT, SUMX, SUMY, SUMXY,SUMX2, SUMY2. 
The output display can be suspended by pressing the 2) key. 
Pressing this key again will resume output display. 

(2) STAT LLIST 
The same contents as STAT LIST are output to the printer. 


Gay = STAT 
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Gives the number of statistically processed data (n 


The CNT function gives the number of statistically processed data. 


Reference 


Refer to section 3-18 for information on the use of the following 
Statistical functions. 


Gives the correlation coefficient (r 


COR gives a correlation coefficient (r) as a numerical expression shown 
below. 


ne DxXY— DX D>y 
¥ {n+ >x*—(2x)4} [ne Sy?—- (Sy)?} 


COR: 


(n: number of data) 
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SUMX 
SUMY 
SUMX2 
SUMY2 
SUMXY 


SUMX: Gives sum of x data. 

SUMY: Gives sum of y data. 

SUMX2: Gives sum of squares of x data. 

SUMY2: Gives sum of squares of y data. 

SUMXY: Gives sum of products of x data and y data. 


These functions give sums, sums of squares and sums of products. 
SUMX : 5x 
SUMY :3y 
SUM X2: 3x? 
SUMY2: Sy? 
SUMXY : =xy 
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MEANX 
MEANY 


MEANX: Gives mean value of x data. 
MEANY: Gives mean value of y data. 


MEANX 


These functions give the mean values of data. 


MEANX : =x/n 
MEANY: Sy/n 


A 
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SDX 
SDY 
SDXN 
SDYN 


Gives sample standard deviation of x data. 
Gives sample standard deviation of y data. 
: Gives population standard deviation of x data. 
: Gives population standard deviation of y data. 


These functions give sample standard deviations and population standard 
deviations as numerical expressions shown below. 


: / ne >x?-—(C>x)? 
SDX : — A(n—1) ) (Xon-1) 
: /  nedy*-Coy)? 


ye 2 
SDXN : / exc Gat (Xan) 


AGO = 2 
SDYN : jase (Yon) 


(n: number of data) 
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EOX 
EOY 


EOX: Gives an estimated value of x in terms of y. 
EOY: Gives an estimated value of y in terms of x. 


EOX numerical expression 
EOY numerical expression 


These functions give estimated values as numerical expressions shown 
below. 
y —LRA an 

LRB (x) 


EOX(y) : 


EOY(x) : LRA+x-LRB (y) 


LRA: Gives linear regression constant term. 
LRB: Gives linear regression coefficient. 


These functions give linear regression constant term and linear regression 
coefficient. 


LRA: >y—-LRB->x 
n 
. ne SxXy—- 2K Dy 
LRB > ————— 
n+ >x?—(>x)? 


(n: number of data) 
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4-7 OTHER oe." 
&H 


Converts a hexadecimal value (up to 4 digits) toa 
decimal value. 


| Format &H hexadecimal value 


This function converts a hexadecimal value up to four digits long to a 
decimal value. The following shows a number of examples. 


Hexadecimal Decimal 


&H1 ENTER 
&HA ENTER 
&HOQOB [Enter 


&HABCD _ [Enter 
&HG ENTER 
&H12345 [ENTER 


&H is not considered a function in BASIC. 


(1) Manual calculation 
Affix a hexadecimal value to &H and press the key. 


Example: &H1B/F = 7039 


(2) Program 
The following shows a sample program application. A variable cannot 
be used after &H, so a hexadecimal character string is affixed to &H 
and then the VAL function is used to convert to a decimal value. 


1@ REM &H EXAMPLE 

2@ INPUT "&H";AS 

3@ H=VALC"&H"+AS$) 

4@ PRINT "&H "3AS$*"="3H 
598 GOTO 18 


Gay HEX$, VAL 
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PROGRAM 
LIBRARY 


PLEASE NOTE: 


Programs in this chapter may be used 
freely without permission. However, 
it must be understood that the 
company is not responsible for any 
damage or loss as a result of using 
these examples. 


In the case of executing programs in 
this chapter without the optional 
plotter-printer, press ‘‘N’’ when the 
PB-770 requests whether printouts 
are made or not by _ displaying 
“PRINTER ON? (Y/N)”. 


STOCK PRICE MANAGEMENT AND PROPER 
SELLING/BUYING PRICES 


This program stores stock prices for the past 53 weeks. After 53 weeks 
of data have been input, each time data of a new week is entered, the 
data of the oldest week is discarded. Based on the stock price data, the 
program outputs the current deviation value and helpful information for 
judgment on buying or selling. The program also permits display of the 
deviation value and moving average, and graphically displays stock price 
fluctuations. 


Explanation 


First, start the program in PO, and the menu will be displayed on the 
screen. Then, enter a number from 1 to 7 given with the menu. Entering 
a number other than 1 to 7 causes the menu to be displayed again. 


(1) Data input 

To input data, press G) after the menu is displayed, and “Initial? (Y/N)” 
is displayed. If you are inputting data for the first time, press the () key. 
If you are inputting data following other data, press the (\) key. When 
the key is pressed, ““CLEAR OK? (Y/N)” is displayed on the screen. 
This is to prevent data from being lost by erroneous input. Normally, 
press the key. 

For initial input, ‘1) DATA=” is displayed on the screen. Enter 
the appropriate stock price and press the key. For the second and 
subsequent data inputs, the screen displays ‘‘WEEK=’’. For input of 
data for the 54th and subsequent weeks, the oldest data is sequentially 
erased. Therefore, the time required for input becomes a little longer. 
To terminate data input, enter a negative number, and the menu will be 
displayed again. 


(2) Judgment on sell or buy 

When menu 2 is selected, ‘Current Price? ’’ is displayed. At this time, 
enter the current stock price, and the program compares the current 
stock price with the past data and outputs the deviation value. To 
exit from this routine, enter a negative value. The menu will be displayed 
again. 


(3) Checking reasonable stock price 


If new data has been entered using this routine, routine (2) must be 
executed before correct values can be output. This is because the two 
routines share part of the same variables. Entering a negative number 
causes the menu to be displayed again. 
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(4) Data output 


When this menu is selected, all the data stored in memory are displayed 
on the screen, then the menu appears again. 


(5) Moving average 

This routine calculates the moving average. When ‘‘No. of movements? ”’ 
is displayed, enter the number of weeks for which the moving average 
is to be calculated. The routine calculates the moving average for the 
period between the current week and the specified week. After this 
routine is executed, the menu is automatically displayed. 


(6) Past moving average 


This routine permits reviewing the change in moving average in the 
past, so this can be used to determine whether the stock price is rising 
or falling. 

When “No. of movements? ”’ is displayed, enter the number of weeks 
for which the moving average is to be calculated. Then, ‘‘FROM 
WHEN? ”’ is displayed. Here, enter the week from which the number 
of weeks is to be counted. 


Example: 


Calculating the moving average for each three weeks, starting from two 


weeks ago. 
I Data of two weeks ago 
2 er eh 692 697 #£=685 #672 ~~ 689 (Current price) 
Ee 


The menu automatically appears after executing this routine. Be careful 
when entering data in routines (5) and (6) to prevent incorrect values 
from being output, especially when the amount of data (the number of 
weeks) stored is relatively small. 


(7) Graph 

This routine graphically displays the stored data to permit easy recogni- 
tion of the general trend of the stock price. 

The menu display appears again after executing this routine. 


Execution Example of a Graph Display 


pein = 
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Program | 


PQ 
1@ CLS 
2@ GOSUB 8d 
3@ INPUT "INPUT NO. "PR 
4@ IF PR>? THEN 1@ ELSE IF PR<1 THEN 
10 
5@ IF PR=1 THEN GOSUB PROG 1 ELSE IF 
PR=2 THEN GOTO PROG 2 
6@ IF PR=3 THEN GOSUB PROG 3 ELSE IF 
PR=4 THEN GOTO PROG 4 
7@ IF PR=S THEN GOSUB PROG 5 ELSE IF 
PR=6 THEN GOTO PROG 6 ELSE GOTO PR 
OG ? 
8@ PRINT :PRINT “DATA INPUT 1" 
3@ FOR I=1 TO 10@:NEXT I 
100 PRINT "PRICE CHECK 2" 
11@ FOR I=1 TO 10@:NEXT I 
12@ PRINT "REASONABLE PRICE 3" 
13@ FOR J=1 TO 1@@:NEXT I 
140 PRINT "DATA OUTPUT 4" 
15@ FOR I=1 TO 1@@:NEXT I 
16@ PRINT "MOVING AVE 5" 
170 FOR I=1 TO 10@:NEXT I 
18@ PRINT "PAST MOVEMENT 6" 
19@ FOR I=1 TO 10@:NEXT I 
2@@ PRINT "GRAPH DISPLAY 7?" 
21@ RETURN 
Pi 
16 CLS 
20 PRINT " ¥X* DATA INPUT Xx" 
3@ INPUT "Initial? ¢Y/N)";P$: IF Ps="¥" 
THEN GOSUB 20a 
4@ IF P$="N" THEN A=A-1 ELSE IF PS<>" 
Y" THEN 32 
5@ A=A+1:GOSUB 340 
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62 
747) 


8G 


ss} 4) 
100 
110 
120 
200 


218 
220 
230 
240 
250 
264 
300 
310 
P2 
18 
28 
30 
42 
5a 
68 
76 
8 
32 
100 


110 
120 
130 
140 
P3 
10 
20 


STOCK PRICE MANAGEMENT AND PROPER 


SELLING/BUYING PRICES 


IF A>=53 THEN 8a 

INPUT "DATA"; 2CAD: IF ZCAX<G@ THEN 2 
€Ad=G:GOTO PROG @ ELSE GOTO 5@ 
INPUT "“DATA+"3DZ:C=C+1:A=53:1F D2< 
@ THEN GOTO PROG @ ELSE 2(€53)=DZ 
FOR B=1 TO 53 

2¢B-1)=2¢B) 

NEXT B 

GOTO &@ 

INPUT "CLEAR OK?CY/N)";TS$: IF TS="¥ 
" THEN 22@ ELSE IF T$="N" THEN 268 
GOTO 200 

ERASE 2:DIN 2¢53) 

PRINT "STOCK PRICE " 

FOR K=@ TO S@:NEXT K 

INPUT "1)DATA";261)9:A=1 
P$="Y":RETURN 

PRINT "WEEK=";A 

FOR K=@ TO 1@:NEXT K: RETURN 


CLS 

PRINT “ ®X PRICE CHECK xXx" 
S=0: Q=0 

FOR D=@ TO 52 

S=S+Z(D): Q@=0+Z2¢(DI72 
NEXT D 

IF A<54 THEN 3@ 

E=S/53: U=Q@-S3KEXE : F=SQRCU/52) 
E=S/A: U=Q-AXEXE: F=SOARCUs CA-1)) 
INPUT "Current Price";Y: IF Y<@ THE 
N 14@ 

D=ROUND (5@+1@0XCY-E)/F;-3) 
PRINT "Deviation=";D 

GOTO 180 

GOTO PROG @ 


CLS 
PRINT "XXREASONABLE PRICEXX" 
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3@ INPUT "Deviation="3D: Y=ROUND(¢D-52 
IXF710+E,-2):1F D<@ THEN 5@ 
40 PRINT " PRICE=";Y:GOTO 32 
5@ GOTO PROG @ 
P4 
1@ CLS 
2Q@ PRINT " *k DATA OUTPUT xx" 
3@ FOR U=8@ TO A-2 
4@ PRINT "DATA"; Ut1; "="32CUt1) 
5@ FOR K=@ TO 5@ 
6@ NEXT K: NEXT U 
70 PRINT "DATA END" 
@@ FOR K=1 TO 2@0@0:NEXT K 
9@ GOTO PROG @ 
P5 
10 CLS 
2@ PRINT “ ¥X MOUING AVE. xx" 
30 xX=0 
4@ INPUT "No. of movements";N 
50 IF A<=53 THEN 180 
6@ FOR L=S3-N TO 52 
7Q X=X+ZCL) 
8@ NEXT L 
398 GOTO 13a 
10@ FOR K=A-N TO A 
110 X=X+Z¢K) 
12@ NEXT K 
13@ MN=XK/N 
14@ PRINT “MOUING AVERAGE"; M 
15@ FOR K=@ TO 30@:NEXT K 
16@ GOTO PROG @ 
P6 
18 CLS 
2@ PRINT "Xk PAST MOVEMENT xx" 
3@ INPUT "No. of movements"; I 
4@ INPUT "FROM WHEN ";0 
58 X=0 
68 IF A<=53 THEN 110 


Zoe 


740) 
<14) 
s}2) 
100 
110 


120 
130 
140 
150 
162 
172 


18 
1930 
208 
P? 
10 
20 
30 
4 
5a 
64 


70 
<14) 
s}4) 
100 
110 
122 
132 
144 


STOCK PRICE MANAGEMENT AND PROPER 


SELLING/BUYING PRICES 


FOR J=S3-0-I TO A-O-!I 

X=X+Z2 CJ) 

NEXT J 

GOTO 14@ 

FOR J=A-O-I TO A-O-1:IF A<=J THEN 
182 

X=Xt+Z CID 

NEXT J 

M=x-71 

FOR K=@ TO 10@:NEXT K 

PRINT "Movins Ave. "3% 
O=0-1:xX=@:FOR K=@ TO 1@:NEXT K: GOT 
0 62 

PRINT " END" 

FOR K=@ TO 30@:NEXT K 

GOTO PROG @ 


IS 
PRINT "XxX GRAPH DISPLAY xXx" 
MX=6:FOR MD=1 TO 53 

IF Z2CNDI OMX THEN MxX=Z2C0MD)D 
NEXT MD 

CLS :LOCATE 153;1:PRINT “MAX=":LOC 
ATE 14,2: PRINT INTCMX) 
FOR K=1 TO 5 
PO=13@-KX2@: DRAWCPO; 27)9-CPO> 30) 
NEXT K 
FOR K=1 TO A-1 

J1=KX¥2+1@: J2=25-25/NXXZCK) 
DRAWC J1, J2>-€J1,25) 
NEXT K 

IF INKEYS=""" THEN 14@ ELSE GOTO PR 
OG @ 


Number of bytes used: 1872 
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Example Data 


13 weeks ago 3 weeks ago 


This week 


11 weeks ago 


ro [335 [a5 
560 ro 
[12 weeks ago [ 563 | 7 weeks ago | 672 | 2 weeks ao | 685 
ED 
Tre weeks ago | 620 ro 


Data counter 
Counters 

Character data 

Stock price 

Average 

Deviation value 
Counters (for periods 
to calculate moving 
average in P5) 

X axis of graph 


Y axis of graph 
Counter 

Max. data 

No. of movements 
Starting week for 
calculating of moving 
average 

Y or N (Initial?) 
Graph scale 

Program selection 
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Sum of squares of 
data 

Sum of data 
CLEAR OK? 
Counter 

Variance 

Counter 

Stock price 


STOCK PRICE MANAGEMENT AND PROPER 
SELLING/BUYING PRICES 


Operation 


Menu display —————> DATA INPUT 1 

PRICE CHECK 2 
REASONABLE PRICE 3 
DATA OUTPUT 4 
MOVING AVE. 5 

PAST MOVEMENT 6 
GRAPH DISPLAY 7 
INPUT NO. ? — 


Soe apie ,|o @ * DATA INPUT # # 
Initial ? (Y/N) _ 
Press @ for initial data 


input and ® for addi- ———>| _ 2 CLEAR OK? (Y/N) 
tional data input. ou @) (Y/N) 


Press @) to clear the —————~> 2) STOCK PRICE 
stored data and @® not 3 
to clear them. 1) DATA? _ 


(1) Data input 4 


Enter a negative num- ——__» —4 ©) \ 

ber to terminate data 5 

input: INPUT NO. ? _ 

(2) Stock price check (2) ©) * * PRICE CHECK * * 

Current Price ? _ 

Enter the current stock 

price and its deviation_______—«, ati = 

value is displayed based 7 585 ce] Deviation =49.23 

on the past data. Current Price ? — 

Entering a negative num- = ©) 

ber causes the menu to____, 9 

be displayed. INPUT NO. oe 

o # * REASONABLE PRICE + * 

Deviation= ? _ 


(3) Reasonable stock 
price 


Enter a deviation value. 


The stock price Is 
displayed. 


—______> 


Entering a negative num- 
ber causes the menu to 
be displayed. 


po 55 PRICE =670.1 
10 Aes 
Deviation= ? _ 
, Et 
INPUT NO. ?_ 
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(4) Data output @Q 2) * *DATA OUTPUT * * 
All data are displayed ———» DATA 1=584 
and then the menu DATA 2=580 
display appears. 15 DATA 3=579 
DATA END 
j 
Menu display——_ > INPUT NO.? _ 


(5) Moving average (5) 2] * * MOVING AVE. * * 
No. of movements ? _ 
Enter the number of-—————> 15 MOVING AVERAGE 643.2 
movements (weeks). 14 ( 
: INPUT NO.? _ 
(6) Moving average 
in the past. Gl 2) * *PAST MOVEMENT * * 
Enter the number of 15 No. of movements? _ 
movements (weeks) 5 


for which the moving 
average isto be cal- ——* Se cas 


= ie pe Moving Ave. 689 
ack. ee Moving Ave. 684.666 
Each moving average A Moving Ave. 682 

is displayed and then END $5 

the menu display ——————_> INPUT NO.? _ 
appears. 


(7) Graph fel oe | A graph is displayed. 
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TELEPHONE DIRECTORY 


This program permits immediate recall of a desired telephone number by 
entering previously stored names. It also permits recalling a phone 
number using the initial letter of a name. Names can also be arranged in 
alphabetical order. 


Explanation 


This program can be used to store and recall the phone numbers of your 
friends and acquaintances. Up to 180 names can be stored at a time. 
Once the names and phone numbers have been stored, it is possible to 
recall the desired phone number merely by entering the initial letter or 
the first few letters of the name. 

When the RAM capacity is expanded to 16KB or more using the RAM 
expansion pack(s), up to 255 names can be stored. In this case, it is 
necessary to change the program in P1 as follows. 


(8KB) 


30 IF N=181 THEN 90 
40 IF N=1 THEN DIM A$(180), B$(180) * 12 


(16KB or more) 


30 IF N=256 THEN 90 
40 IF N=1 THEN DIM A$(255), B$(255) > 12 


First, enter CLEAR @) after inputting all of the programs. 

Then, execute the program in PQ, and the menu is displayed on the 
screen. Enter the appropriate number, 1 to 4. There is no need to press 
the @] key. If an OM error (Out of Memory) occurs in line 40 of P1, 
erase the other programs or data or expand the RAM capacity using the 
RAM expansion pack(s). 


(1) INPUT 
Stores names and phone numbers. Input data by the following proce- 
dure. Data to be input is underlined. 
NAME? CASIO @) 
TELNO.? 123-4567 2) 
Input all names and phone numbers by repeating the above procedure. 


When the last name and phone number are entered, enter END @}. The 
menu is displayed again. 
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(2) SORTING 

Arranges the stored names in alphabetical order. While the names are 
being sorted, ‘SORTING ...’ is displayed on the screen. The sort 
Operation is completed in several seconds to a few minutes depending 
on the amount of data stored. The sorted names (and the associated 
phone numbers) can be sequentially displayed on the screen by pressing 
any key on the keyboard. After all the names and phone numbers 
are displayed, the menu is displayed again. 


(3) LOOK FOR 


Recalls the phone number when a name is entered. 
Enter the name as follows: 


NAME? CASIO @) 
The name and phone number are displayed as follows: 


CASIO 
123-4567 


Note that only the initial letter or the first few letters of the name may 
be entered to recall the phone number. In this case, if there is more 
than one name with the same initial letter or first few letters, all of 
them are displayed. Note also that if identical names are stored, they 
are all displayed. If any name which has not been stored is entered, 
‘NO DATA’ is displayed on the screen. In this case, press any key on the 
keyboard to return to the menu. 


(4) DELETE 


Deletes data which has been stored. 
Enter the name to be deleted as follows: 


NAME? ABCDE @) 
Then, the screen displays: 


ABCDE 
XXX—-XXXKXX Y/N? (XXX—XXXX: phone number of ABCDE) 


If you really wish to delete the name and phone number, press the 
key. If not, press the (\)key. This is to assure you that no data is erro- 
neously deleted. 

To clear all the data which have been stored or to cancel a DD error, 
execute the CLEAR command. Since menu 1 (INPUT) has the function 
to add data, it may be combined with menu 4 (DELETE) to add or 
delete data freely. 
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Proorar | 


PQ 
18 


100 
Pl 


102 


CLS 
PRINT "1-—INPUT 2-SORTING” 
PRINT "3-LOOK FOR" 

PRINT "4-DELETE" 
K$=INKEY$:1F K$="" THEN 52 
IF K$="1" THEN GOTO PROG 1 


IF K$="2" THEN GOTO PROG 2 
IF K$="3" THEN GOTO PROG 3 
IF K$="4" THEN GOTO PROG 4 
GOTO 5@ 

CLS 
N=N+1 


IF N=181 THEN 9G 
IF N=1 THEN DIM A$C180);B4$0180)xk12 


INPUT “NAME "$3 ASCN) 
IF ASCNI="END" THEN 1088 
INPUT "TEL NO. ";BS¢N) 
GOTO 18a 

PRINT "FULL": BEEP 1 
N=N-1 

GOTO PROG @ 


CLS :PRINT "SORTING..." 
FOR I=1 TON 
MNS=ASCI): X=1 
FOR J=I TO N 
KKS$=A$C J) 

GOSUB 2240 

NEXT J 

AS CXI=AS$CID2 ASCID=aNNS 
MMNS$=B$ CX) 
BSCX=B$C1): BSCII=MNNS 
NEXT I 
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112 
200 
212 
230 
242 


250 


260 
270 


280 
380 
Ps 
12 
20 
32 
40 
50 
62 


7 
8a 
30 
100 
110 


120 
130 
142 


P4 
12 
20 
32 
42 
52 
62 


GOTO PROG 5 

KU=2 

KU=KU+1 

O01=LENCMNNS) : O2=LENCKKS) 

IF KU>O1 THEN RETURN ELSE IF KUD>DO 
2 THEN 300 
MIS=NID$SCMMN$3sKU> 192: KIS=MIDSCKKS 3 KU 
91) 

IF ASCCNIS)=ASCCKI$) THEN 210 

IF ASCCNI$) SASCCKI$) THEN X=J:MN$= 
KK$: RETURN 

RETURN 

X=J:NNS=KK$: RETURN 


CLS 
INPUT "NAME "3MNs 
X=LENCMM$S > 
I=G 
I=I+1 


IF I=N+1 THEN IF F=1 THEN 120 ELSE 
130 

IF MMS=LEFTSCA$C12;X) THEN 92 

GOTO 5a 

F=1:PRINT ASCII) 

PRINT BSC¢I) 

K$=INKEY$:1F K$="" THEN 11@ ELSE 5 

Z) 

F=@:GOTO PROG @ 

PRINT "NO DATA" 

K$=INKEYS: IF K$="" THEN 14@ ELSE 1 

20 


CLS 
INPUT “NANE “3MNMs 
X=LENCMMS 
I=2 
I=I+1 


IF I=N+1 THEN 180 
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78 
3G 
108 
110 
128 
136 
1490 
1524 
162 
172 
18@ 
a) 
12 
20 
38 
4 
5@ 
68 
7@ 


TELEPHONE DIRECTORY 


IF MMS=LEFTSCA$CID2%>) THEN 100 
GOTO 5@ 

PRINT ASCI) 

PRINT BS(1I)3" YN "3 
INPUT K$ 

IF K#="Y" THEN 158 
GOTO 52 

AS CID=ASCN) 
B$CI1)=BSCN) 

N=N-1 

GOTO PROG @ 


FOR I=1 TON 
CLS 
PRINT ASCII) 
PRINT BSCI1) 
K$=INKEY$: IF K$="" THEN 5@ 
NEXT I 
GOTO PROG @ 


Number of bytes used: 10@3 
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Menu display —__________, 1—INPUT 2—SORTING 
3—LOOK FOR 
4—DELETE 


Input the first _______, NAME ? SMITH, JOHN 
person's name. TEL NO. ?__ 


Input telephone ——___, 
number. 


Input the second —————_> NAME ? BROWN, MARY 
TEL NO. ? — 


person's name. 


Input telephone —______, 


number. ‘ : J) 


ee a END J] 1-INPUT 2-—SORTING 
and then the menu is 3-—LOOK FOR 


displayed on the screen. 4-—DELETE 


(3) LOOK FOR 
Whose telephone num- —__> ao 0 0tid NAME ?— 


ber do you want to 


know? NAME ? SMITH, JOHN 
Only a family name ————> SMITH, JOHN 

can be entered. 03-583-4111 

The menu is dis- ——————_» 1-—INPUT 2—SORTING 
played on the screen. 3-—LOOK FOR 


4—DELETE 
(2) SORTING 
Alphabetical order ————__» je SORTING.. 
After “SORTING...’*’ ———> ALLEN, ROBERT 
oiep pees 06-314-2681 
The sorted names can ———> BROWN, MARY 
b tially dis- 
SG ala 052-264-1453 
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After all the names —————-> 1-—INPUT 2—SORTING 
and phone numbers 

are displayed, the 3—LOOK FOR 

menu is displayed. 4-—DELETE 

(4) DELETE 


ahs really want —————> NAME ? SMITH, JOHN 

to delete, press ™), 

If not, press ® . SMITH, JOHN 
03-583-4111 Y/N? — 


The menu is displayed. ——> 1-—INPUT 2—SORTING 
3—LOOK FOR 
4—DELETE 


Confirm that the data 
menu 3. 


“NO DATA” indicates ——___» NAME ? SMITH, JOHN 


that the name has not 
been stored. NO DATA 


Variable contents 


| =N | (Number of NAMEs/TEL NOs)—1 


x Length of character string to be 
looked for 


A$(1) 
2 Names 
A$(180) 
B$(1) 
2 Telephone numbers 
B$(18Q) 


| MM$ Character string to be looked for 


293 


CROSS TOTAL 


This program obtains the sums of horizontal (X) and vertical (Y) data, 
or sorts the data to determine the percentage of each data element. For 
example, item X may be a certain product and item Y may be a certain 
month. 


Explanation | 


First, execute the program PQ, and the following menu is displayed on 
the screen: 


DATA INPUT «For inputting data 
TOTAL «For obtaining horizontal and vertical totals 


SORT <For arranging data 
DATA OUTPUT ?_ <For checking all the data 


(1) Data input 
When menu 1 (DATA INPUT) is selected, “CLEAR (Y/N)? ”’ is dis- 
played. To input data for the first time, press). Then, the program 
requests you to input the values of X and Y (the value of X is the num- 
ber of data elements in horizontal direction, and the value of Y is the 
number of data elements in vertical direction). 

Input the appropriate values. 

After the values of X and Y have been input, 4 a a Coe 
you are requested to input the data. Input y, 

the data according to the element numbers, 

displayed on the screen: 


X=1,Y=1>X=2,Y=17X=3,Y=1... 4 
X=1,Y=27>X=2,¥=27°X=3,Y=2... 3 


After all data are input, the grand total is 

displayed and the menu display appears. 

If the data entered contains an error, enter 1 again. When “CLEAR 
(Y/N)? ” is displayed, enter N. Then, the program asks you about the 
element number whose associated data is to be corrected. Input the 
appropriate element number, and “DATA?” is displayed. Input the 
correct data. The correct grand total is displayed and the menu display 
appears. 
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(2) Sum of data in item X or Y 


When menu 2 (TOTAL) is selected, ‘PRINTER ON? (Y/N)” is dis- 
played. The subtotals are printed by entering Y. The program asks you 
whether you wish to obtain the sum of item X or item Y. Input X or 
Y, whichever is appropriate. 

When X is input, the program outputs the subtotals of X from 1 to the 
preset value, and returns to the menu display after outputting the 
grand total. When Y is entered, the program outputs the subtotals of 
Y from 1 to the preset value, and returns to the menu display after 
outputting the grand total. 


(3) Sorting 

When menu 3 (SORT) is selected, the program asks you whether the 
subtotals of X or Y are to be sorted after displaying “PRINTER ON? 
(Y/N)”. When X or Y is input, “SORTING NOW” is displayed and a 
sort operation is started. The data sorted in descending order is out- 
put, together with the ranking, item name, subtotal and percentage 
of each element. Then the menu is displayed. The sort operation requires 
some time. For example, it takes approximately one minute and 10 
seconds to sort 20 data elements. When the sort operation is completed, 
a buzzer sounds and the data output begins. After execution of this 
program, the menu display appears again. 

Since this program uses many half-precision variables, it can handle a 
relatively large volume of data. Note, however, that the maximum 
number of digits of input data is five. 

To review the result of sorting, press the key and run line 140 
of the program P4. 


(4) Data output 
When menu 4 (DATA OUTPUT) is selected, data such as ‘‘X=1 
Y=1 DATA=233” is displayed after displaying “PRINTER ON? 
(Y/N)”. After all the data are displayed, the menu display appears 
again. 
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Proaram | 


P@ 

1@ PRINT "1 DATA INPUT"; "2 TOTAL"; "3 
SORT"; "4 DATA OUTPUT "; 

2@ INPUT R 

3@ IF R=1 THEN GOTO PROG 1 

4@ INPUT "PRINTER ON?7CY/N)D"3F$ 

5@ IF R=2 THEN GOTO PROG 2 

6@ IF R=3 THEN GOTO PROG 3 ELSE IF R= 
4 THEN GOTO PROG 5 


P1 
1@ INPUT "CLEAR CY/N)7"3S$ 
20 IF S#="¥" THEN CLEAR : GOTO 3@ ELSE 
IF S$<>"N" THEN 1@ ELSE 118 

3@ INPUT "X"3X%3,"V"3¥ 

4G DIM DI CRs Yak! CRXISYVI CY) 

5@ FOR J=1 TO Y:Y!CJ)=@:FOR I=1 TO X 
6@ PRINT “INPUT DATA X="315" Y="3 J; 
7@ INPUT D!CI3.J) 

BB Yi CJI=H¥'CIJN+D! C13 JD 

93@ NEXT I:NEXT J 
10@ GOSUB 20@:GOTO PROG @ 

11@ PRINT "CORRECTIONCX;Y)"5 
12@ INPUT I; J 
13@ INPUT "DATA";D!ICI; J) 
14@ FOR J=1 TO Y:¥!¢J)=@:FOR I=1 TO X 
158 Y'CJI=H¥'CJN+D, CI; JD 
16@ NEXT I:NEXT J 
17@ GOSUB 20@:GOTO PROG @ 
200 S=@:FOR I=1 TO X:X!C1)=@:FOR J=1 T 
0° 
210 X! CID=X!1C19+D! C1; JO: S=StD! C13; JD 
22Q@ NEXT J:NEXT I 
23@ PRINT “GRAND T."3S:FOR K=@ TO 180: 
NEXT K 
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240 
P2 

14 

20 


8a 

38 

35 

97 
100 
110 
MAS 
120 
130 
160 
170 
173 
175 
180 
138 
{35 
200 
210 
300 


320 


348 
354d 
P3 
18 
20 


30 
100 
110 
120 


CROSS TOTAL 


RETURN 


INPUT "X-SUM OR Y-SUN"; PS 

IF P$="Y" THEN 16@ ELSE IF P$="x" 
THEN 8@ ELSE 18 

FOR K=1 TO X 

PRINT "X="3K3" SUM="3 XK! CK) 

IF F$="Y" THEN GOSUB 3300 

IF INKEY$="" THEN 97 ELSE 100 
NEXT K 

PRINT "GRAND T.=";S 

IF F$="Y" THEN GOSUB 34@ 

IF INKEY$="" THEN 12@ ELSE 130 
GOTO PROG @ 

FOR K=1 TO Y 

PRINT "Y="3K3" SUM="3Y!CK) 

IF INKEY$="" THEN 173 ELSE 175 
IF FS="Y" THEN GOSUB 320 

NEXT K 

PRINT "GRAND T.="5 

IF FS="Y" THEN GOSUB 340 

IF INKEY$="" THEN 2@@ ELSE 210 
GOTO PROG @ 

LPRINT "X="3Ks" SUM="3X%! CK): RETURN 


LPRINT "Y="3K3;" SUM="3 Y!CK)2RETURN 


LPRINT "GRAND T."5S 
GOTO PROG @ 


INPUT "SORT X OR Y?";3P$ 

IF P$="Y" THEN GOSUB 100 ELSE IF P 
$="X%" THEN GOSUB 2@@ ELSE 1@ 

GOTO PROG 4 

ERASE A! 

DIN A! CY; 2) 

FOR J=1 TO Y 
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138 
148 
158 
200 
219 
220 
230 
240 

P4 

18 
20 
30 
42 
50 
60 
65 
72 
ge 
92 
95 
188 
118 
120 
138 
148 
158 


162 
170 


180 
198 
200 
210 
220 
230 


AICI, 1IAVY!IC JIA! CI, 20=)J 

NEXT J 

N=Y: RETURN 

ERASE A! 

DIM A!CX3;2) 

FOR -f=1: TOsX 
A!CI;1)=xX%! CI): A!CI;20=1: NEXT I 
N=X: RETURN 


CLS 
PRINT "SORTING NOW" 
REM SORT 


FOR K=N-1 TO 1 STEP -1 

FOR L=1 TO K 

IF ACL» 1)9>A!CL+13;1)9 THEN 100 

FOR M=1 TO 2 

T=A! CLM) 

A! CLs MI=A! CL4+15M) 

Ai CL +13; M0=T 

NEXT M 

NEXT L 

NEXT K 

REM PRINT 

FOR K=1 TO 1@: BEEP :NEXT K: CLS 
FOR K=1 TO N:GOSUB 220 

PRINT USING"##"5K3" "3P$3"="3USING 
"##'3A!lCKs 2Z73;USING #HHHHHHH" SA! CKs 
1)3 

PRINT USING" ###";A3 "%" 

IF F$="Y" THEN GOSUB 30@:NEXT K:GO 
SUB 320:GOTO PROG @ 

FOR L=1 TO 30@:NEXT L:NEXT K 
PRINT "GRAND T_."3S 

FOR K=@ TO 30@:NEXT K 

GOTO PROG @ 

REM RATIO 
A=ROUND CA! CK3 1297S; -3)k100 
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CROSS TOTAL 


RETURN 

LPRINT USING"##"3K3" "3P$3"="3USIN 
G'H#E"SA!CKs 293; USING"HHHHHHHH"’ 5A! CK 
2193 

LPRINT USING"###"3A3"%"2 RETURN 
PRINT "GRAND T."3S 

LPRINT "GRAND T."3S 

RETURN 


CLS 
FOR J=i1 TO Y:FOR I=1 TO xX 
PRINT "X="513" Y="3IJ3" DATA=";D! C1 
J? 

IF F$="Y" THEN 5@ 

IF INKEY$S=""" THEN 4@ ELSE 6@ 
LPRINT "X="3 135" ="3J3" DATA="5D! 
CI, J) 
NEXT I:NEXT J 

IF FS$="Y" THEN LPRINT :LPRINT «LPR 
INT 
GOTO PROG @ 


Number of bytes used: 1737 
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Variable contents 


Percentage. Array subscripts. YorN. 

For storing data Counters. Variable for data ex- 
during sorting. Number of data ele- change. 

Data array. i ing. |X! )| Array for sums of X. 
Determines whether Xor Y. ! Array for sums of Y. 
the printer is used or Menu selection. 

not. Grand total. 


* If you wish to handle data more than 5 digits, change variables A! ( ),D!( ), X!( ) and 
Y! ( ) as follows: A( ),D( ), X( )andY( ) 


Sample Data 
X= 1 Y= 1 DATA= 321 
X= 2 Y= 1 DATA= 369 
X= 3 Y= 1 DATA= 357 
X= 1 Y= 2 DATA= 159 
X= 2 Y= 2 DATA= 147 
X= 3 Y= 2 DATA= 123 
X= 1 Y= 3 DATA= 842 
X= 2 Y= 3 DATA= 862 
X= 3 Y= 3 DATA= 579 


EE 


Menu display ————_ > FO 1 DATA INPUT 
2 TOTAL 
. 3 SORT 
(1) Data input 4 DATA OUTPUT ? 


Do you want to 


clear the stored ——__—___ 
dt? (2 | OS) | creancy/ny?— 


horizontal items? 


How many a 
vertical items? 

oer vei PE ner onset 
(X=1, Y=1). 
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Input data ———______> 


(X=2, Y=1). 


Grand total ———————> 


display 


Menu display —@~> 


(2) Sum of data in item X 
Is the printer used? —————> 


Enter X @) for X 
subtotals and Y =) 
for Y subtotals. 


Output of each sub-—————> 
total (SUM) and 
grand total. 


Menu display ————————> 


(2) Sum of data in item Y 


Is the printer used? —————> 


Enter Y 2] for Y 
subtotals. 


Menu display ————-———> 


CROSS TOTAL 
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INPUT DATA X= 2 Y= 1 
? 


DATA INPUT 
TOTAL 

SORT 

DATA OUTPUT ?_ 


X=1 SUM= 1322 
X=2 SUM= 1378 
X=3 SUM= 1059 
GRAND T. =3759 


DATA INPUT 
TOTAL 

SORT 

DATA OUTPUT ? _ 


Y=1 SUM=1047 
Y =2 SUM=429 

Y =3 SUM=2283 
GRAND T. =3759 


DATA INPUT 
TOTAL 

SORT 

DATA OUTPUT ? — 
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(3) Sorting 
ee ae aS ee 
ey ae B) J) PRINTER ON?(Y/N)__ 
Arrangement for each _——>| 15 |  () @J} | SORTXORY?— 
subtotal (X or Y) (Bey (N) 2) SORT X OR ¥! 

Sort being SORTING NOW 


executed. 
The data sorted in ———> 1378 37% 
descending order is 1322 35% 
output, together 1059 28% 
with ranking, item 
name, subtotal and . 
percentage. 
Menu display ——____—=> eee 
18 

SORT 

DATA OUTPUT ? _ 
If the printer is con- 
nected, enter ¥ PRINTER ON? (Y/N) — 
When sorting data —___—_+ poe SORT X OR Y 
in item Y, enter (N) el 


The data sorted in ______, 2283 61% 
descending order 1047 28% 
is output. = 429 11% 
GRAND T. 3759 
DATA INPUT 
2 TOTAL 
(4) Data output 4 DATA OUTPUT? _— 


nected, enter Y 2) (4) 2) PRINTER ON ? (Y/N) 


(N) @] X=1 Y=1 DATA=321 

2) X=1 Y=1 DATA=369 

25 5) X=1 Y=1 DATA=357 
eo} X=1 Y=2 DATA=159 


* The sum of percentages is not always 100% depending on data values. 
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GRAPH MAKING PROGRAM 


This program draws various types of graphs with the plotter-printer 
(FA-10 or FA-11). Up to 12 data items can be input. The range of data 
is as follows. 
| Value of data | < 1E90 
The program can draw beautiful band, bar, and line graphs, taking 
advantage of the 4-color plotter-printer. 
* This program is stored on the cassette tape which comes with the 
FA-11 optional plotter-printer. It is also stored on the microcassette 
tape which comes with the CM-1 optional microcassette tape recorder. 


Explanation | 


When the program is executed, the menu is displayed. First, data must be 
entered. This can be done by pressing @). 

The range of data is shown above. Data may be negative numerical data. 
Up to 12 data items can be entered. After the 12th data item is entered, 
the menu display automatically appears. To terminate the input in the 
middle, press the @] key without entering any numerical data. 

Menu 2 is used to correct input data. Pressing (2)causes the first input 
data to be displayed, and pressing the @]key causes the next data to 
appear. Pressing the and @] keys causes the previous data to appear. 
Input the correct data when data to be corrected appears. 

Menu 3 is the routine to make graphs. Three kinds of graph names are 
displayed by pressing (3). Select the type of graph by pressingG), @), or 
(3). (Pressing facades return to the menu display.) 

Type 1 is a band graph. The entire length of band represents 100%, with 
the percentage of each data element represented by the length it oc- 
cupies. For easy recognition, the individual data elements are shown in 
different colors and stripes. When the band graph is selected, negative 
data causes the menu to be displayed. 

Type 2 is a bar graph. The scale is automatically set according to the 
size of input data. In this graph, positive values are output in green and 
negative values are output in red. 

Type 3 is a line graph. When (3) is pressed, ‘“‘Over previous graph?” is dis- 
played. If a bar graph has been drawn just before, a line graph can be 
overwritten on the bar graph by pressing (J. If no bar graph has been 
drawn or a line graph should not be overwritten on a bar graph, press (§). 
In this case, the appropriate scale is automatically set and the line 
graph is drawn. 

Regardless of the type selected, the menu display appears after the 
graph is drawn. The menu display also appears when no data is entered. 
Note that starting the program again clears the existing data. 

Menu 4 terminates program execution. 

Menu 5 is provided to output the data to the plotter-printer. It can 
also be used to output the total of data. 
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Print-out Example 


Print 


DC1)= 
DC2)= 
DC 3d= 
D(4)= 
D(5)= 
DC6)= 
DOP)= 
D(8)= 


Total= 


G0 180 20 380 480 50 60 78 880 3B 108%) 
-——_+—_+—__+—__+—__ + +—_—_+——_+——_ +—_ 


Data 


1200 
4500 
8383 
9102 
7701 20000 
1532 
4562 
18020 


558002 15800 


5880 


Prooram | 


PQ 


10 CLEAR 

20 CLS :PRINT " ===] DATA. === zs 

30 PRINT TABC2)93"1: Input 2:Correct"sT 
ABC62);"3:Grarh 4: END"; TABC2)9;"5:Pr 
int Data"; 

40 K=VALCINKEY$): IF K<1 THEN 4@ ELSE 
IF K>5 THEN 40 
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5@ BEEP :GOTO KxX10@ 

106 CLS :ERASE D:DIN DC13):2Z=1 

11@ LOCATE 2:;3:PRINT "<RETURN> : END"; 

12@ LOCATE 6;@:PRINT " "5 

13@ LOCATE @3:@:PRINT "DC"3 23 ")="3: INPU 
T ""; ABS 

1490 IF ABS<>"" THEN DCZI=UALCABS):S IF 2 
€12 THEN 2Z=2+1:GOTO 12@ ELSE 20 EL 
SE 2=2-1:GOTO 20 

200 IF 2<1 THEN 28 

21@ CLS :I=1:PRINT TABC46);":Shift RE 
TURN"; TABC6)035 ":RETURN "; 

22@ LOCATE 432:PRINT CHRS$C228); CHR$¢C22 
3)-LOCATE 4,3: PRINT CHR$¢C23@); CHRS 
C231); 

230 DRAWC (6323 239-C473 230-0473 24)-€3232 
4):LOCATE @;@:PRINT "DC"; 

24@ LOCATE 2,@:PRINT Is ")="3DC1)05" 

"SLOCATE 6)1:PRINT " 

25@ LOCATE 631: INPUT ABS: K$=INKEYS$: IF 
ABS<>"" THEN DCI)D=VAL CABS) 

26@ IF K$=CHR$CO249) THEN I=I-1:1F I<1 T 
HEN 20 ELSE 24@ 

270 IF K$=CHR$(13> THEN I=I+1:1F 152 T 
HEN 2@ ELSE 24@ 

28G@ IF K$=CHR$C23)> THEN I=I+1:1F I>2 T 
HEN 2@ ELSE 24@ 

290 IF K$="" THEN T=I+1:1F 152 THEN 20 

ELSE 240 
300 IF 2<1 THEN 2@ ELSE CLS 
31@ PRINT TABCS5);"1:Band"s TABCS)3 "2: Ba 


r 
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320 


330 


348 
400 
580 


514 
520 
530 


540 
554 


1000 
1010 


1020 
1030 


10848 


1058 
1060 
1070 
1080 


10390 
1100 


1110 
2000 


PRINT TABC5);"3:Line"s TABC5)3 "4: ME 

NU"; 

K=UALCINKEY$): 1F K<1 THEN 33@ ELSE 
IF K>4 THEN 334 

BEEP :GOTO Kx10@@ 

LPRINT CHR$¢€28)3; CHR$C46)2: END 

IF 2<1 THEN 2@ ELSE GOSUB 600@:LPR 
INT "Q1"2U=@ 

LPRINT "N93;0"3;"PPrint Data" 

FOR I=1 TO Z 

LPRINT "M"39@-4xXI;",@0"3;"PDC";MID$C 

STR$CII9293"J="3DCI) 

U=U+DC1I)2NEXT I 

LPRINT "“M";9S@-1*¥4-5;"3;0","PTotal=" 
>U:GOSUB 68000: GOTO 20 

GOSUB 6000: A=2 

FOR I=1 TO 2: IF DCIX<@ THEN ERASE 
I:GOTO 20 ELSE A=AtDCID= NEXT I 

IF AX<=@ THEN 20 

LPRINT "05:0"3"X%1,8:;16"3"N853;1"3'"P 
C"3CHRS$C370;3")9" 

FOR I=100 TO @ STEP -1@:LPRINT "MN" 
>-4+8X1I71@03"3,1"5"P"312NEXT I 

B=0@: C=0 

FOR I=1 TO 2 

C=ROUND CDC ID /AXBG+C3 -—2) 


LPRINT "J"3I MOD 43"A"3B3"3-33"3C3 
ae 

LPRINT “G"sI MOD 2+13"5";C-B;s "5-20 
9"3 CI MOD 3074+.5 

B=C:NEXT I] 

LPRINT “H30@":GOTO 20 


GOSUB 68006: GOSUB 7@@0:GOSUB 8800 
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2010 
2020 
2030 
2048 


2050 


2062 
2870 
3000 


3010 


3820 
3032 
3040 
3050 
3060 


3072 
3080 
3030 
3180 


3114 
3120 
3132 
3140 
3158 
3162 
31706 


GRAPH MAKING PROGRAM 


FOR I=1 TO Z 

IF DCI)>=@ THEN J=2 ELSE J=3 
LPRINT “J"3sJ 

LPRINT "“A"303"5s"3s6-8XI3"s";ROUNDCD 
CID /AXSO/Nt+O3—-295"3"5 -8XI 

LPRINT “MN"303"5"36-8XIs"G1s 's ROUND 
CDC IDYAXSG/N3-293"3-6" 

NEXT I 

LPRINT "MN@3";-8xC€Z2+1): GOTO 20 

IF 2<2 THEN 2@ ELSE CLS :PRINT “Ov 
er Previous sgrapPh?"; TABC8)3 "Y/N" 
K$=INKEY$: IF K$="Y" THEN BEEP :GOT 
0 3080 ELSE IF K$<>"N" THEN 3010 E 
LSE BEEP 

GOSUB 62820 

GOSUB 7@00:GOSUB 8aaa 

LPRINT "Li"; "Jo" 

FOR I=1 TO Z 

F=3-8xI:IF I MOD 2=1 THEN LPRINT " 
D@3;"3F3",9@0,";3;F ELSE LPRINT "DS9@;" 
sFe'sOs"'5 

NEXT I:LPRINT "LO"; "M@30" 

S=S+t1:IF S>3 THEN S=@ 

T=T+.25°1F T>3.93 THEN T=@ 

IF T<2 THEN LPRINT "B1.6" ELSE LPR 
INT "B6. 4" 

LEPRINT >: "oS" 3 T 

G=ROUND (D¢61)/AXSG/N+03 -2)93H=-5 

FOR I=2 TO 2 

U=ROUND (DCI) “AXS@G/N+0s—2) : U=3-8X]I 
LPRINT "D"sGsrs"sHes ts "SUS "9 "3 U 
G=U: H=VU 

NEXT I 
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3180 


4000 
6802 


6010 
7880 
7012 
7020 
7038 
7048 
705 
7O6G 
7870 
8000 


8010 


8020 
8030 
8040 


8850 
8860 


8070 
808G 
8038 
8180 
8110 


LPRINT "B3.2"3"MN@s"3-8xCZ2Z+1)2GOTO 
20 

GOTO 28 

LPRINT CHR$¢€28); CHR$637)3"08;0"5"J 
B"s"LO"s"S1i"s"QG"s"YO"5"B3.2"3 "H28 
S=@27 T=@2 RETURN 

Y=-9E99: B=SE99 

FOR I=1 TO 2 

IF DCID>Y THEN Y=DCI) 

IF DCI)<B THEN B=DCI) 

NEXT I 

IF Y>=@ THEN DC@)=Y ELSE DCB)=G 

IF Bo@ THEN DC2Z2+1)=@ ELSE DCZt+1)=B 
RETURN 

IF SGNDC@)XSGND¢(Z+19<=@ THEN M=ABS 
CDCO)-DC2Z4+1)) ELSE M=DCOd: IF Ma T 
HEN M=ABSDC2Z+1) 

IF M=<@ THEN 2@ ELSE R=INTLGTN: A=1 
Q~R 

IF AXINTCNZADX.75<M THEN A=AX.5 
D=LENCSTR$ CAD DX2.4+5 

IF SGNDC@)XSGNDCZ+19<@ THEN N=INTC 
M7Ad+2 ELSE N=INTCMN“AD +1 
C=ABSINTCDC@)7A)D+SGNDC@) 

FOR I=N TO @ STEP —-1:1F C=@ THEN O 
=I x3S@/N 

C=C-1:2NEXT I 

LPRINT "D@;@3;90;0"5;"Q1"2W=18/N: U=G 
U=U+5: IF UkW<K18 THEN 80390 

IF D¢@d<=@ THEN 815@ ELSE X=0 
K=ROUND(Xs-2)2LPRINT "D"3Ks"923 "5K 


3"5-2" 
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812@ LPRINT "MN"sK3"9"3Ds "P"sROUND( CX-0) 
XAXN/’9@>R-2) 

8130 LPRINT "Li"; "D"sK3s"3@9"s5K5"9"3—-Z2k8 
—29 "LO" 3 X=X+WXY 

814@ IF X<3S@ THEN 8110 

815@ LPRINT "DS9@s2;9@s-2"3"MN3SG,";D2"P"5 
ROUND € €9@-0) XAXN/’SGs R-2) 

816@ IF DCZ2+1)>=@ THEN 822@ ELSE X=0-Wx 
U 

817@ K=ROUND¢CX3-2):LPRINT "D"5K3 "923 "3K 
>" 3-2" 

818@ LPRINT "M"sKs"3"3D3s"P"; ROUND(C CX-0) 
XAXN/’9@3R-2) 

8190 LPRINT "Li"s"D"sKs"s@G@s"sK3"39"5-Z2x8 
—23 "LO" 2X=xX-WxXYU 

82060 IF xX>@ THEN 81704 

821@ LPRINT "D@s2;@3;-2"3"N@s"3Ds '"P"5 ROU 
ND C-OXAXN/’93@»R-2) 

8220 LPRINT "D@s@;@3";-8k¥2-2;3"59@;"5;-8x 
2-23 "398;0"53"NG@sB" 

823G RETURN 


Number of bytes used:2712 


If one-key commands are used for the input of lines 30, 140, 240, 3010, 
3060 and 8000, spaces are automatically entered after the commands 
and a whole line cannot be input because the input range of 79 characters 
is exceeded. Therefore, input each line after deleting extra spaces using 
the key. 


Example: 30 PRINT TAB(2);.... 


30 PRINTTAB(2);.... 
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Menu display —————————> —---- DATA---- 
1: Input 2 : Correct 
3: Graph 4: END 
5 : Print Data 


(1) Data input D( 1)= 
<RETURN> : END 


After the 12th data 
item is entered, the 
menu display automati- 


cally appears. §—WHW—_> D( 1) =1200 
(2) Data correction A ! 
After the correction is ——_-» AShift RETURN (Previous data) 


made to the last, the WRETURN (Next data) 
menu is displayed. 


(3) Graph making 


Band graph is 


printed out, ———_______» 


(After the graph is output, 
the menu is displayed.) 


Bar graph is 

printed out, —————___+ (After the graph is output, 
Determine whether the menu is displayed.) 

a line graph is over O : h? 

written on the bar_______—, Yer PFevlous drapis 

graph or not. Y/N 

Line graph is_________, (After the graph is output, 
printed out. the menu is displayed.) 


(4) Execution 
termination. 


(5) Data output. 
Data are printed out._—___» (After the data are output, 
the menu is displayed.) 
- i eee 
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6-1 PB-770 COMMAND TABLE 


6-1-1 Operational Symbols 


[1] Arithmetic operators 


Power Raise X to power Y. 


Multiplication Multiply X by Y. 
Division : Divide X by Y. 


Remainder when 
X is divided by Y. 


Remainder 
Addition Add Y to X. 
Subtraction _ Subtract Y from X. 


Assignment = = Assign Y + 5 to X. 


Relational operators (conditional expressions) 


X=Y X is equal to Y. 

X<>Y, X><Y X is not equal to Y. 

xXx<yY X is smaller than Y. 

X>Y X is greater than Y. 

X<=Y, X=<Y X is smaller than or equal to Y. 


X>=Y, X=>VY X is greater than or equal to Y. 


@ The relational operators are valid only in !F statements. 
e@ A comparison can be made between numerical constants, numerical variables, and 
numerical expressions, and between character constants and character variables. 


Character expression operators 


5 Two or more character strings can be concatenated by a + (plus sign). 


6-1-2 Special Character 


xx 107 XEY Exponent entry (Multiply number X by 
Y power of 10.) 


© If the absolute value of the operation result is equal to or greater than 10! or smaller than 10° 
(0.001), it is automatically indicated by exponential notation. 
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6-7 PB-770 COMMAND TABLE 


6-1-3 Built-in Functions 
| Name _ |General format| PB-770 format Meaning / Remarks 
Trigonometric sinx SIN X Gives the sine of X. 
cosx COS X Gives the cosine of X. 


tanx TAN X Gives the tangent of X. 


Inverse in? ASN X Gives the arcsine of X. 
Prigonomete ACS X Gives the arccosine of X. 


ATN X Gives the arctangent of X. 


Hyperbolic i HYPSINX Gives sinh X. 
HYPCOS X Gives cosh X. 
HYPTAN X Gives tanh X. 


Inverse inh x HYPASN X Gives sinh”! x 
hyperbolic nae HYPACS X Gives cosh 'x. 
re HYPATN X Gives tanh! x. 


Logarithmic log x LGT X 10g 9 X (common logarithm) 
Inx LOG X loge X (natural logarithm) 
Exponential EXP X X power of natural logarithm 
base (€) 


——— 


Absolute ABS X Gives the absolute value of X. 
value 
INT X When X>90, the fraction portion 
of X is discarded. 
When X<@, the fraction portion 
of |X| is rounded up, a —(minus 
sign) is prefixed to |X|. 
INT 1.271 
INT —1.2—> —2 
FRAC X Eliminates the integer portion to 
obtain only the fraction portion. 
Circular TT Gives an approximate ratio of 
constant the circumference of a circle to 
its diameter in 11 digits: 
3.1415926536. 


Random Generates a 10-digit pseudo 
number random number (0 < RND < 1). 
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General format; PB-770 format Meaning/remarks 


SGN X Checks the sign of an argument: 
Xx<0O->-1 
X=0-> 0O 
X>0O-> #1 


ROUND (xX, Y) Rounds off the value of X 
at 10Y positions. 


Sexagesimal DEG (d[,m[,s] ] )| Gives the decimal 
—decimal (d, m, s: numeri- | equivalent of a 
cal expressions) | hexadecimal value. 


Gives the contents of address X 
contents 
reading 


6-1-4 Character Functions 


code of first PRINT ASC Displays the character code of 
character of a (“E’’) character E, 
string. 


Gives one PRINT CHR $ Displays character (E) equivalent to 
character de- (69) character code 69. 

signated by 

character code. 


Converts A= VAL (X$) Converts a character string of nu- 
numeral in merals stored in character variable 
a character X$ to a numerical value. 

string to 

numerical 

value. 


Converts nu- C$ = STR $(X)_ | Converts a numerical value stored 
merical value in numerical variable X to a charac- 
to character ter string. 

string. 


Fetches speci- C$ = LEFT $ Fetches the three characters on 
fied number (X$, 3) the left of character string stored 
of characters in X$ and assigns them to C$. 
from left of 

character 

string. 
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i 


Fetches speci- | RIGHT $ 
fied number 

of characters 

from right of 

character 

string. 


Fetches speci- 
fied number of 
characters start- 
ing from the spe- 
cified position. 


Counts the LEN 
number of 
characters in 


a character - 
string. 


Inputs one INKEY $ 
character 

from the 

keyboard. 


Converts a 
decimal value 
to sexagesimal. 


Converts a 
decimal value 
to hexadecimal. 


C$= RIGHT $ | Fetches the three characters on 
(X$, 3) the right of character string 
stored in X$ and assigns them to 
C$. 


from the third character of character 
string stored in X$ and assigns them 
to C$. 


A= LEN (X$) Assigns the number of characters in 
character string stored in X$ to A. 


Fetches the five characters starting je 


A$ =INKEY $ | When INKEY$ is executed, if one 
key on the keyboard is pressed, it is 
assigned to A$. Only one character 
can be assigned to A$. 


C$=DMS$(xX) Converts the numerical value assign- 
ed to X to a character string that 
represents the sexagesimal value 
of X, 


C$=HEX$(X) Converts the numerical value assign- 
ed to X to a character string that 
represents the hexadecimal value 
of X. 


6-1-5 Display Functions 


[ie remn [eanne [ene 


Checks POINT 
whether a 

dot on the 

screen is on 

or off. 


Moves cursor TAB 
by specified 

number of 

Positions. 

Specifies USING 
output 

format. 


PRINT TAB(10)| Tabs cursor to position 1@ on the 
screen, 


PRINT USING Displays a numerical value stored in 
“HHH ##": A | numerical variable A according to 
format “###.##" 


POINT (10,20) | Checks whether the dot represented 
by coordinates (10, 20) is on 
(displays 1) or off (displays Q) 
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6-1-6 Statistical Functions 


ane a Number of statistical data processed. | 270 


Sum of X data. 

Sum of Y data. 

Sum of squares of X data. 

Sum of squares of Y data. 

Sum of products of X data and Y data. 


Sample Sanaa deviation of X data. 
Sample standard deviation of Y data. 
Population standard deviation of X data. 
Population standard deviation of Y data. 


LRA Linear regression constant term. 
LRB Linear regression coefficient. 


a Correlation coefficient. = 


EOX Estimated value of X for Y. 
EOY 3 Estimated value of Y for X. 274 
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6-1-7. Manual Commands 


a 
Automatically; AUTO AUTO Line numbers starting with line 10 
generates and incremented by 10. 
ine numbers: AUTO 100 Line numbers starting with line 100 

and incremented by 10. 
AUTO 50, 20 Line numbers starting with line 50 
and incremented by 20, 
Resumes CONT CONT Resumes the execution of a program 
program that has been stopped by a STOP 
execution. statement or by the key. 
DELETE DELETE 50 Deletes line 50. 
DELETE 30— Deletes from line 30 to the end. 
DELETE —100 | Deletes up to line 100 from 
the beginning. 
DELETE Deletes from line 159 to line 200. 
150 — 200 
Modifies EDIT EDIT Displays the first line and specifies 
program. the EDIT mode. 
EDIT 30 Displays line 30 and specifies the 
EDIT mode. 
Displays LIST LIST Displays the program in the pre- 
program list. sently specified program area. 
LIST LIST 5O | | Displaysline50. line 50. 
LIST a — Se from line 30 to the end. 
LIST 30 — 50 Displays from line 30 to line 50. 


Displays all programs in the entire 


LIST V Displays registered variable names. 
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ese [eons [ane [wesare 
Prints LLIST LLIST Prints the program in the presently 
program list. specified program area. 

LLIST 50 Prints line 50. 

LLIST 30 — Prints from line 30 to the end. 


LLIST — 50 Prints from the beginning to 137 
line 50. 


LLIST 30 — 50 | Prints from line 30 to line 50. 


LLIST ALL Prints all programs in all program 
areas 


LLIST V Prints registered variable names. 
Reads LOAD LOAD Reads a program in internal code 
program from format to the presently specified 
cassette tape. program area. 
LOAD ALL Reads all programs in internal code 
format to the all program areas. 
LOAD, A Reads a program in ASCII code 
format to the presently specified 
program area. 
LOAD, M Links the program in the presently 
specified program area with the 
program read in ASCII code format. 


LOAD, D, Reads internal code format data 
4096 from memory address 4096(1@). 


LOAD “ABC” Perform functions similar to the 
above respectively in regard to 

aes aa programs with file names. 

LOAD 

“TEST”, 


LOAD 
“TEST”, 


LOAD 
“PB, D, 4096 


Erases Erases a program in the presently 
program. specified program area. 
NEW ALL Clears the entire RAM area. 
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6-1 PB-770 COMMAND TABLE 


PASS PASS “KEY” Sets a password named ‘’KEY.” 


Specifies a PROG PROG 2 Specifies the program area 2. 
program area. 
RUN RUN Starts the execution of a program 
from the beginning of the presently 
execution. specified program area. 147 
RUN 100 Starts the execution of a program 
from line 100. 


Stores pro- SAVE SAVE Stores the program in the presently 
grams to a specified program area on a cassette 
cassette tape. tape in the internal code format. 
SAVE ALL Stores all programs in all program 
areas on a cassette tape in the 
internal code format. 
SAVE,A Stores the program in the presently 
specified program area on a cassette 
tape in the ASCII code format. 


SAVE,D, Stores internal code format data on 
3000, 3999 a cassette tape from address 3000 
(1@) to 3999(10). 
* (10) indicates decimal values 
as opposed to hexadecimal values. 


SAVE “ABC” eo neers similar the 
above respectively in regard to 

SAVE ALL . . 

“CASIO” programs with file names. 

SAVE 

“TEST”,A 


SAVE "PB", D, 
3000, 3999 


Displ SYSTEM Displays program area status, | 
Ate Seren ANGLE setting, memory aera 
remaining number of bytes, an 

Progr alm abeas- data area starting address. 

Checks VERIFY VERIFY Performs a parity check of the pro- 

programs gram file which appears first. 

stored on VERIFY Performs a parity check of the pro- 
“ABC” gram with a specified file name. 


cassette tape. 
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6-1-8 Program Commands 


[tee [comming [wane anna 
Specifies ANGLE ANGLE 0 Specifies degrees. 
angle unit. ANGLE 1 Specifies radians. 

ANGLE 2 Specifies grads. 


Generates | BEEP Same as BEEP 0. 
buzzer sound. BEEP 0 Generates a low pitched beep. 
|BEEP1 Generates a high pitched beep. 
Reads and CHAIN CHAIN Loads and executes the PF B that 
executes first appears. 
Programs CHAIN “XYZ” | Loads and executes the program 
with a specified file name. 
Clears all CLEAR CLEAR Clears all variables. 
variables. . 
Specifies the oo ee 
starting add- : 
ress of the 
data area. 
Clears display | CLS CLS Clears the entire screen and moves 
screen. the cursor to the home position. 
Stores data. DATA DATA 1,2,3 Stores data to be referenced by the 
READ statement. 
Declares DIM A (3) Declares a one-dimensional single- 
array. precision numerical array. 
DIM B (2, 3) Declares a two-dimensional single- 
precision numerical array. 
DIM C! (4) Declares a one-dimensional half- 
precision numerical array. 
DIM D! (3, 4) Declares a two-dimensional half- 
precision numerical array. 
Declares a one-dimensional fixed- 
length character array. 
DIM F$ (4,5) Declares a two-dimensional fixed- 
length character array. 
DIM G$ (2)*3 Declares a one-dimensional defined- 
length character array and specifies 
3 as the character length. 
DIM Declares a two-dimensional defined- 
H$ (4, 5)*6 length character array and specifies 
6 as the character length. 
Draws point DRAW DRAW (Q, 0) Draws a point at coordinates (0, 0). 
es straight DRAW Draws a straight line from coordi- 167 
ate (1, 0)—(5,10) | nates (1,0) to (5, 10). 
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6-1 PB-770 COMMAND TABLE 


Erases point DRAWC DRAWC (0, Q) Erases ae. point at coordinates 

and straight (0, 0). 

line. Erases the straight line between 

et eins a 1) | coordinates (1,0) and (5, 10). 

Terminates Terminates the execution of a 
program program. 
execution. 
Releases ERASE ERASE A Releases the definition of registered 
array name. variable A or array variable A. 
Loop Repeatedly performs the processing 
(repeat). between FOR and NEXT while in- 


crementing the value of variable | 
by 0.5 from 5 to 20. 


GET GETA Reads the variable data that first 
variable data appears. 
be Clete GET Reads the variable data having a file 
: “MAX” name ‘’MAX,”’ 
Jumps to GOSUB | GOSUB 100 100 | GOSUB 10@ | Jumps to the subroutine in line 100. 
subroutine. 
GOSUB Jumps to the subroutine in program 
PROG 3 area 3. 
End of RETURN RETURN Returns to the command following 
subroutine. the GOSUB statement. 
Unconditional| GOTO | GOTO 500 500 | GOTO 500 —|_ Jumps to line 500. 
IMP: GOTO Jumps to program area 5. 
PROG 5 
Conditional IF ~ IF i>9 Jumps to line 50 if | is greater than 
jump. THEN ~ THEN 50 9; otherwise, jumps to line 80. 
ELSE ~ ELSE 80 
Data input INPUT INPUT S Displays a ?, then waits for data to 
from be entered in S. 


keyboard. INPUT Displays NAME, then waits for data 
“NAME”, T$ to be entered in TS. 
NAME"; US Displays NAME ?, then waits for 
“NAME"; NAME"; US data to be entered in U§$. 

Assigns data Cee | A=B Assigns B to A. 

to variable. 

Specifies Laie fasten 2:3 Specifies coordinates (2, 3) as the 

cursor cursor position. 

position. 
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bd a oh POKE Writes the value 10(1@) to address 497 

address. 3500, 10 3500(10). 

Displays PRINT PRINT C, D Displays the values of C and D on 

data. separate lines. 

PRINT C; D Displays the values of C and D 
on the same line. 

PRINT $AB$ Displays the pattern defined by 
ABS. 

Prints data. LPRINT LPRINT C, D Prints the values of C and D 
on separate lines. 

LPRINT C; D Prints the values of C and D 
on the same line. 

Stores PUT PUTA Stores data of variable A on cassette 

variable data tape. 

a cassette PUT Stores data of variable A with file 

ape. “DATA” A name on cassette tape. 

Reads stored READ READ X Reads data stored in variable X by 

data. DATA statement. 

Specifies RESTORE | RESTORE Reads from the first DATA state- 

sequence of ment when executing READ 

execution statement. 

Cees RESTORE 100 | Reads from the DATA statement on 
line 100 when executing READ 
statement. 

Inputs statisti- | STAT STAT 1, 2; 2 Inputs values of x data, y data and 

cal data. frequency. 

Clears the STAT STAT CLEAR Sets contents of CNT, SUMX, 

statistical CLEAR SUMY,SUMX2, SUMY2 and 

registers. SUMXY to @. 

Displays the STAT STAT LIST Displays contents of CNT, SUMX, 

statistical LIST ‘SUMY, SUMX2, SUMY2 and 

register SUMXY. 

contents. 


Prints the sta’ | STAT STAT LLIST Outputs contents of CNT, SUMX, 
tistical register | LLIST SUMY , SUMX2, SUMY2 and 
contents SUMXY to printer. 
Halts program | STOP STOP Suspends the execution of a 

execution. program. 

Traces TRON TRON Specifies the trace mode and traces 

program the status of program execution. 

execution. 

Releases TROFF TROFF Releases trace mode. 

tracing of 

program 

execution. 
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6-2 ERROR MESSAGE TABLE 


Message Meaning Countermeasure 


BS error 
(Bad Subscript) 


® Subscript of an array variable is a 
negative value or the value exceeds 
255. 

Example) DIM A (256) 


® Specified numerical value is outside 
the argument range. 
Example) The POINT function has 
the following argument.ranges: 
OLX <159and OLY S31 
But the specified numerical value 
is outside this range. 


BV error 


@ An overflow of the input or output 
(Buffer oVerflow) 


buffer. 


DA error 
(DAta error) 


@ A READ statement or GET state- 
ment was executed even though 
there is no data to read. 


DD error 
(Duplicate 
Definition) 


e Arrays having the same array name 
and a different subscript were 
doubly defined. 

Example) The following array 
variable declarations by a DIM 
statement cause a DD error. .... 
DIM A(1), A(2, 3) 

DIM A! (1), A!(2, 3) 
DIM A$(1), A$(2, 3) 
DIM A$(1)*20, 
A$(2, 3)*20 
DIM A$(1)*20, 
A$(2, 3)*20 


e@ An attempt was made to execute any 
of the following manual commands 
in a program: 

CONT, PASS, RUN, EDIT, 
DELETE 


e An attempt was made to execute any 
of the following program commands 
manually: 

END, LET, REM, STOP, LOCATE, 
DRAW, DRAWC, GOTO, GOSUB, 
RETURN, INPUT, DATA, READ, 
RESTORE, FOR~NEXT, 
IF~THEN~ELSE~ 


e@ A CONT command was used when 
program execution could not be 
resumed. 


FC error 
(illegal Function 
Call) 
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@ Change the value of subscript 
to a value within the specified 
range. When the subscript is a 
variable, check the assigned 
value. 


@ Re-specify the subscript within 
the specified argument range. 


@ Each operation or program 
statement cannot exceed 79 
characters in length. 


@ Check the relation between the 
READ and DATA statements. 
Ensure that there is data for 
each READ. 


@ Check the variable on the line 
in which an error has occurred. 
Also check for subscripts having 
the same array name. Change 
either of the array names and 
reorganize the program. 


e@ Input CLEAR or ERASE before 
the DIM statement or execute it 
manually to clear the array. 


e Remove the incorrect com- 
mand from the program. 


e Execute the command with a 
line number attached. 


e@ Press the key. Then either 
re-execute the program from 
the beginning or, if the stopped 
line is known, re-execute the 
program from the line next to 
the stopped line by ‘“RUN line 
number’”’, 
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Message Meaning Countermeasure 


FO error 
(NEXT without 
FOr) 


GS error 
(RETURN 
without GoSub) 


MA error 
(MAthematical 
error) 


NO error 
(Nesting 
Overflow) 


NR error 
(device Not 
Ready) 


OM error 
(Out of Memory) 


OV error 
(OVerflow error) 


@ FOR statement without corre- 
sponding NEXT statement. 


@ RETURN statement without corre- 
sponding GOSUB statement. 


@ An arithmetic operation involving 
numerical values or numerical func- 
tions is uncertain or impossible. 

Example) Division by 0. 


@ The number of nesting levels ex- 
ceeded the specified limit. 
Example) GOSUB~RETURN 
Max. 12 levels 
FOR~NEXT 
Max. 6 levels 


@ |/O device is not correctly con- 
nected. 
Example) No magnetic tape 
recorder is connected. 


@ RAM capacity is insufficient. 
@ Insufficient number of bytes 
required for variable or PRINT 
(LPRINT) in the work area. 
Example) 5 bytes remains. 
O$="'12345" 
PRINT “12345” 


® Bad specified address location 
by the CLEAR statement. 


@ The result of an operation or the 


numerical value entered exceeds 
1918 


324 


@ Check the nesting structure. 


@ Check the nesting structure in 
the GOSUB statement, and 
clearly distinguish between the 
main routine and the sub- 
routine. 


@ Check the numerical expression 
on the line in which an error 
has occurred. Also check the 
value of the any variables. 


@ Check the nesting structure and 
reduce the nesting level within 
the allowable range. 


@ Check that the relevant device 
is properly connected and 
switched on. 


@ Delete unnecessary programs. 


Decrease the size of the data area 
using the CLEAR command. 


Expand memory capacity using 
RAM expansion pack (s). 


Confirm the number of remain- 
ing bytes using the SYSTEM 
command. 


@ Use a higher address in the 
CLEAR command and 
decrease the size of the 
data area. 


@ Check the numerical expression 
in the line in which error 
occurred. 

Insert a PRINT statement in 
the program to check the value 
of the variable. 


6-2 ERROR MESSAGE TABLE 


Message Meaning Countermeasure 


PR error 
(PRotected error) 


RW error 
(Read Write error) 


SN error 
(SyNtax error) 


SO error 
(Stack Over error) 


ST error 
(STring error) 


@ An attempt was made to execute 
any of the following commands 
which cannot be used with a pro- 
gram having a password: 

DELETE, LIST, LLIST, NEW, 
EDIT 

e@ An attempt was made to add a new 
line to, or delete a line from, a pro- 
gram having a password. 

e A different password was entered. 


@ An attempt was made to load a pro- 
gram whose password is different 
from the PB-770 password. 


@ Parity error during execution of a 
LOAD or VERIFY command. 
@ Printer function is not activated. 


@ Command format error. 


@ The line number has a fraction. 


@ An array having three or more di- 
mensions was declared. 


@ Numerical value stack exceeds 
8 levels. 
@ Operator stack exceeds 20 levels. 


@ Character stack exceeds 10 levels. 


@ An attempt was made to assign a 
character string whose length ex- 
ceeds the allowable character vari- 
able length. 


The allowable character variable 
length is as follows: 
— Fixed character variable 
Max. 7 characters 
— Registered character variable 
Max. 16 characters 
— Fixed-length character array 
variable Max. 16 characters 
— Defined-length character array 
variable Max. 79 characters 
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@ Re-enter the password, release 
the locked condition, and 
execute the program. 


@ Input the correct password. 


@ Release the PB-770 password 
before loading. In this case, 
the newly loaded password be- 
comes the PB-770 password. 


®@ Store the program again 
using the SAVE command. 
e Activate the printer function. 


@ Use the EDIT command to call 
the line where the error has 
occurred and correct the line. 


e Correct the line number. 


e@ The number of dimensions 
must not exceed 2. 


e@ Simplify or divide the numeri- 
cal expression so that the stack 
level can fall within the speci- 
fied range. 


©@ Simplify or divide the charac- 
ter expression so that the stack 
level can fall within the speci- 
fied range. 


@ Change the variable to another 
variable that can contain more 
characters. 

Decrease the number of charac- 
ters of the character string to be 
assigned to the variable. 

Be careful when concatenating 
character strings. 
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Message Meaning Countermeasure 


TM error @ In an assignment statement, the left | @ Both the left and right sides of 

(Type and right sides are of different an assignment statement must 

Missmatch) variable types. be either numerical variables or 
character variables. 


@ The argument types do not match e Assign a numerical value toa 
during an assignment. numerical variable, and a char- 
acter string to a character 
variable. 
UL error @ The specified line number does not 
(Undefined Line exist inan IF~THEN, GOTO or 
number) GOSUB statement. 


@ Create a line number to which 
a jump is to be made or change 
the specified line number to 
which a jump is to be made. 


@ No program exists in the program @ Create a program area to which 
area specified by aGOTO or GOSUB a jump is to be made, or change 
statement. the location to which a jump is 

to be made. 


UV error @ Undefined variable used. ® Check the initial value of 
(Undefined 


variable. 
Variable) @ Array variable used without 


e Declare the array by the DIM 
declaring it using DIM statement. 


statement at the beginning of 
the program. 


e Subscript of an array variable @ Change the size of the subscript 


exceeds the range specified by within the specified range. 
DIM. 


VA error @ An attempt was made to register @ Up to 40 registered and array 


(VAriable error) more than 40 variables. variables can be used. Check 


the variable names by LISTV, 
and delete unnecessary variable 
names by CLEAR or ERASE. 
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6-3 CHARACTER CODE TABLE 


Hexa- 
decimal 


] 16 
[DEL] 
41 a Fd 
LINE 
[aoe [INS] 
2 18 
i) Bi 
4 2H 
5 21 
ae 
END 
6 22 
[BEL] | [ENTER] 
Fi oo 
[a] 
8 24H 
[TAB] 
9 25 
18 26 
[HOME] 
11 of 
— 
[CLS] CSR right 
[second 
1? 28 
<_ 
[CR] CSR left 
[Sel 
43 29 
14 BIS) 
Wed 
is a4 


[SPACE] | | [SPACE] i" 

oe 48 a B8 Ob) 1A) Pee | |e te) 1S) [PB APA 
st Ho 65 64 of = 179) (985) | 6 aL OSs] eo] [oo 244 
BL] 58 “i 8? OB) LAAs (TSE | PG) AG] LTE AS LS) Ae |e 
35 a | of Ba OO) LAS) PTT | a eS] TS SS) [Sa Ae ea 
Brij C2 fit} g4| (490! [416] [132] [148] [64] [180| [196 [212 ssi 2u4 
of oo 29 BS) [AT Ta) | SS) aS) 6S] | TR TL LS 22? 25 
oo o4 Fis) 66) 1462) (948) | 954) 1456) | 166) | WS) LAB L244 i pata 
oo oo Fal CAREC EIR ELE Sl PIE zie 237 [247 
LTS) 26 fe BH “aH 178) (136) | 152) 1168) [TBS [eee (216) [eae] |e 
hl of fit 69) [ABS Tt | aS) SS 6S) | S| 7 a kt ae 
uP ac] f4 O08) 1786) (122) | 458) (Aa [Te | 166) [282] [218 2o4 ‘foes 
LT} oo #5 OF [ter Paes] So) PASS) La AB | eS] [21 Pa 251 
H4 68 Fifi OF) (ABB) Wa | te) [ASG LT] ABS] [Pea [228 ns 262 
5 64 fi OS) 169) PWS) | Pad) La] LS) BS) Pes) [Ae er) Leo 
46 i fi O48) 178 |e) | | |B 174 1968) [286) [22>] [238] [254 

: [NULL] [NULL] 
uf 63 Fi") OO) La ae es) PASS PTS) PAS ee Pees] eo) [5S 
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SPECIFICATIONS 


= Type 
PB-770 
= Fundamental calculation functions 


Negative numbers, exponentials, parenthetical addition/subtraction/multiplication/ 
division (with priority sequence judgement function — true algebraic logic), MOD. 


= Commands 
AUTO, CONT, DELETE, EDIT, LIST, LLIST, LOAD, NEW, NEW ALL, PASS, 
PROG, RUN, SAVE, SYSTEM, VERIFY, ANGLE, BEEP, CHAIN, CLEAR, CLS, 
DIM, DRAW, DRAWC, END, ERASE, FOR-TO-STEP, NEXT, GET, GOSUB, 
RETURN, GOTO, IF-THEN-ELSE, INPUT, LET, LOCATE, POKE, PRINT, 
LPRINT, PUT, READ, DATA, RESTORE, REM, STOP, TRON, TROFF. 
Statistical commands — STAT, STAT CLEAR, STAT LIST, STAT LLIST. 


®@ Functions 
SIN, COS, TAN, ASN, ACS, ATN, HYPSIN, HYPCOS, HYPTAN, HYPASN, 
HYPACS, HYPATN, SQR, LOG, LGT, EXP, ABS, INT, FRAC, SGN, ROUND, PI, 
RND, DEG, PEEK, ASC, CHR$, VAL, STR$, LEFT$, RIGHT$, MID$, LEN, 
INKEY$, DMS$, HEX$, TAB, USING, POINT, &H. 
Statistical functions — CNT, COR, SUMX, SUMY, SUMX2, SUMY2, SUMXY, 
MEANX, MEANY, SDX, SDY, SDXN, SDYN, EOX, 
EOY, LRA, LRB. 


= Calculation range 
+1 x 10°” ~ +9.999999999 x 10”? 
(Internal calculation uses 12-digit mantissa.) 
=Program language 
BASIC 
=Memory capacity for programs 
RAM: Standard 8K bytes, expandable up to 32K bytes. 
(Including 1321 bytes in system area.) 
ROM: Approx. 32K bytes. 
@= Number of program areas 
Maximum 10 (PO — P9) 


= Number of stacks 


Subroutine 12 levels 
FOR-NEXT loop 6 levels 
Numerical values 8 levels 
Operators 20 levels 
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SPECIFICATIONS 


#Display system 
Liquid crystal display (20 digits x 4 lines) 


=@Display elements 
32 x 160 dots (20 x 4 characters) 


= Display contents 
10-digit mantissa + 2-digit exponent 


=Main component 
LSI 


=Power consumption 
0.1W 


=Power source 
Main: 4 AA size batteries. 
Sub (for RAM backup): 1 lithium battery (CR1220). 


=Battery life 
Main: Approximately 100 hours on type SUM-3 (continuous operation). 
Sub: (see page 15) 


= Auto power off 
Power is automatically turned off approximately 6 minutes after last operation. 


= Ambient temperature range 
0°C to 40°C (32°F to 104°F) 


= Dimensions 
23mmH x 200mmW x 88mmD (74"H x 7%'"W x 314"D) 
= Weight 


315 g (11.1 oz) including batteries. 
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INDEX 


A 

ABS 228 
Absolute value 228 
ACS 219 
&H 275 
ANGLE 154,214 
Array variable 67 
ASC 243 
ASCII code 243 
ASN 219 
Assignment 37 
ATN 219 
AUTO 130 
Auto power off 16 
B 

Backup battery 15 
Base of a natural logarithm 223 
BASIC 34 
BEEP 155 
Built-in functions 313 
C 

Calculation precision 26 
Calculation priority 26 
CAPS 23 
CHAIN 156 
Character array variable 29, 62, 79 
Character code 243, 327 
Character coordinates 31 
Character mode specification 122 
Character registered variable 29 
Character string format specification 265 
Character variable 62, 192 
CHR$ 93, 245 
CLEAR 158 
CLS 56, 161 
CNT 270 


Colon (:) 54 


COR 

Comment statement 
Common logarithm 
Conditional expression 
Conditional jump 
CONT 

Control variables 
Correlation coefficient 
COS 


D 

DATA 

Data area 

Debug 

DEG 

DEGREE 

DELETE 

DIM 

Dimension 

Direct mode 

Display contrast control 
Display of number of digits 
Displaying patterns 
DMSs$ 

Dot 

DRAW 

DRAWC 


E 

E 

EDIT 
Editing key 
END 

Enter key 
EOX 

EOY 
ERASE 
Error message 
EXP 


270 

209 

223 

47,128, 186 
186 

131 

78 

90, 270 

217 


205 

159 

40 

241 
154, 216 
132 

79, 162 
64 

22 

18 

69 

95 

259 

101 
101, 167 
101, 167 


69, 312 
134 
24, 134 
48,170 
18, 38 
87,274 
87,274 
171 
323 
226 


Exponential regression 


F 


File attributes 

File name 

Final value 

Fixed variables 
FOR~TO~STEP/NEXT 
Format character string 
FRAC 

Function mode 


G 

GET 

GOSUB 

GOTO 

GRAD 

Graphic coordinates 
Graphic characters 

Graphic mode specification 


H 
Half-precision 
HEX$ 
HYPACS 
HYPASN 
HYPATN 
HYPCOS 
HYPSIN 
HYPTAN 


I 
IF~THEN~ELSE 
Increment 
Initialization 
INKEY$ 

INPUT 

INT 


91 


150 
128 
172 

29 
59,172 
263 
232 

24 


177 

60, 180 

48, 184 

154, 215 
31, 101 

93 

122 


28, 69 
260 
221 
221 
221 
221 
221 
221 


47, 186 
172 

45 

257 

43, 46, 189 
230 
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LGT 

Linear regression coefficient 
Linear regression constant term 
LIST 

LLIST 

LOAD 

LOCATE 

LOG 

Logarithmic regression 
Loop 

LPRINT 

LRA 


Main power source 
Main program 
Main routine 
MEANX 

MEANY 

Message 

MID$ 

MOD 
Multistatement 


N 

Natural logarithm 
Nesting 

NEW 

NEW ALL 

Null-string 

Number of bytes used 


INDEX 


47, 180, 184 


252 
256 
195 
223 
87,274 
87,274 
137 
137 
139 
196 
223 

91 

172 
122, 198 
87,274 
87,274 


15 
180 

60 

87, 272 
87, 272 
44 

254 

26, 27, 312 
54 


223 
181 
143 
143 
164 

32 


INDEX 


Numerical array 67 
Numerical array variable 67 
Numerical format specification 264 
Numerical registered variable 29 
Numerical variable 29, 62, 192 
O 

One-dimensional arrays 65 
P 

PASS 144 
Password 141 
Pattern cursor 97 
PEEK 242 
Pl 238 
Plotter command 123 
Plotter-printer with cassette interface 100 
POINT 101, 117, 266 
POKE 197 
Power regression 92 
PRINT 43, 48, 198 
PRINT command expanded function 202 
PROG 146 
Program areas 41 
Program modification 52 
PUT 203 
R 

RADIAN 154, 216 
RAM expansion pack 17 
Random number 239 
READ 205 
Registered variable 30, 190 
Relational operators 28 
REM 45, 209 
RESTORE 205 
RETURN 180 
Return key 18, 38 
RIGHT$ 253 


SAVE 

Screen display control 
SDX 

SDXN 

SDY 

SDYN 

Semi colon (;) 
SGN 

Shift mode 
SIN 
Single-precision 
SOR 

Starting address 
STAT 

STAT CLEAR 
STAT LIST 
STAT LLIST 
STOP 

STR$ 
Subroutine 
SUMX 

SUMX2 
SUMXY 
SUMY 

SUMY2 
SYSTEM 


Ten keys 
Trace mode 
TROFF 
TRON 
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239 
236 
147 


148 

53 
87,273 
87,273 
87,273 
87,273 
46, 48 
234 

23 

214 
28, 69 
222 
160 
88, 268 
88, 269 
87, 269 
87, 269 
210 
250 
60, 180 
87,271 
87, 271 
87,271 
87,271 
87,271 
55, 151 


53, 261 
218 

35 

212 
212 
212 


INDEX 


Two-dimensional array 66 
U 

Unconditional jump 184 
USING 54, 263 
V 

VAL 247 
VERIFY 153 
Wait loop 175 
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GUIDELINES LAID DOWN BY FCC RULES FOR USE OF THE UNIT IN THE U.S.A. (not 
applicable to other areas). 


This equipment generates and uses radio frequency energy and if not installed and used properly, that is, in 
strict accordance with the manufacturer’s instructions, may cause interference to radio and television 
reception. It has been type tested and found to comply with the limits for a Class B computing device in 
accordance with the specifications in Subpart J of Part 15 of FCC Rules, which are designed to provide 
reasonable protection against such interference in a residential installation. However, there is no guarantee 
that interference will not occur in a particular installation. If this equipment does cause interference to 
radio or television reception, which can be determined by turning the equipment off and on, the user is 
encouraged to try to correct the interference by one or more of the following measures: 

yates reorient the receiving antenna 

Saint relocate the computer with respect to the receiver 

ites move the computer away from the receiver 

ia plug the computer into a different outlet so that computer and receiver are on different branch 

circuits. 

If necessary, the user should consult the dealer or an experienced radio/television technician for additional 
suggestions. The user may find the following booklet prepared by the Federal Communications Commission 
helpful: ‘‘How to Identify and Resolve Radio-TV Interference Problems” This booklet is available from the 
US Government Printing Office, Washington, D.C., 20402, Stock No. 004-000-00345-4. 
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Epilogue 


This manual overhaul is dedicated to Alex Istomin, aka HWRO, you were a giant, 
my friend. 


I decided to scan in this manual because there wasn't one available Online and I 
thought I might be able to give something back to the Pocket Computer 
community that has given me so much over the years. This was a labour in love, 
completed between March 15 to July 27, 2024. It was scanned in page by page 
using a Brother DCP-135C all-in-one printer/scanner (Thank you VueScan for still 
supporting my ancient scanner!), edited in GIMP and OCR-ed with Acrobat Pro. I 
completely re-drew all tables and about 90% of the graphics from scratch, corrected 
obvious errors (spelling, code and others). I added a page on character coding for 
Kana mode PB-770s (Japanese models, or modded European ones). The TOC, index 
and hopefully all keyword references have been linked. I'll upload two versions, a 
colour scan (cover only) and a Kindle/bandwidth friendly monochrome version. If 
you find any huge errors that might have slipped in during editing, please let me 
know. Most of you know how to get in touch with me. 


-R. Swartz 2024 
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